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INTRODUCTION 



PROGRAM LIBRARY DEFINITION 



Welcome to lnsit e ' ', Intel's software index and technology exchange. We think you will be impressed and enthusiastic 
about your new library of programs. Within the contents of lnsit e TM - you will find a diversified collection of programs, 
subroutines, procedures, and macros written by the users of Intel's microprocessors. Thanks to your contributions and 
continued participation in this Library, we are able to maintain and facilitate this unrestricted interchange of non-propri- 
etary programs among our subscribers. 

Each individual subscriber is responsible for making his own independent analysis to determine which programs in the 
Library are applicable to his requirements. The programs in the Library have been collected and published for your con- 
venience and are not guaranteed nor supported by Intel. The verification of each program will be left up to the individual 



user. 



PROGRAM LIBRARY MANUAL 



This Program Library Manual includes submittal forms and source listings for those programs three pages and under. 
Longer programs are represented solely by an abstract which indicates the function of the routine, the required hardware 
and software and memory requirements. Should you find that you are interested in one of the longer programs, the listing 
and paper tape may be purchased from Intel at reproduction cost (see Section 3, Ordering Procedure) The Program 
Library Manual is divided into five major areas of program classification. At the beginning of each section you will find a 
listing of the contents of that section. At the end of the manual is an alphabetical index of all programs in the Library 



SOURCE TAPES 

Source paper tapes and listings of most programs in the Program Library Manual are available for purchase at a minimum 
reproduction cost. For further information see Section 3, Ordering Procedure. 

PROGRAM DISKETTES 

Program Diskettes are available for most programs in your Program Library Manual. See Section 3 for prices and ordering 
procedure. 

LIBRARY UPDATES 

By filling out and mailing the REGISTRATION CARD in the front of your Library you will be placed on the Membership 
List and will receive the bi-monthly Program Library Update Package. This package will include all new programs which 
have been accepted into the Library over the preceding two months. During your subscription year you will not only 
receive the Library's current programs, but also six update packages. However, unless you mail in your Registration Card 
you will not receive these updates. 

QUALITY ASSURANCE 

As it is impossible to test each program submitted to the User's Library, the verification of each program will be left up to 
users. Included in this section are several "Program Certification and Review Forms". The purpose of this form is to 
determine whether or not a program functions as its author claims. This form should not be used as a vehicle for program 
enhancement or elaboration. We appreciate your responses which let us know the accuracy of library programs. 

PROGRAM REVISION 

Program revisions submitted by the original author are handled in a manner identical to original program submission That 
is, the author should submit a completed "Microcomputer User's Library Submittal Form" along with the entire package 
or relevant documentation. The program which has been revised should be referred to in a cover letter by the reference 
number which appears in the upper right-hand corner of the original Library Submittal Form. 

One member may not revise another member's program. Correctable errors should be documented on a "Program Certifi- 
cation and Review Form" and sent to the User's Library Manager for dissemination to the original authors to allow them 
to submit a revision. 

Enhancement or reprogramming of a program already in the User's Library should be submitted as a new package of 
documentation and will be treated as an original submission. 
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3065 Bowers Avenue 
Santa Clara. California 95051 
Tel: (408) 987-8080" ■ 
TWX: 910-338-0026 
TELEX 34-6372 

U.S. AND CANADA SALFS < 

ALABAMA 

Pen-Tech Associates. Inc 
Holiday Office Center 
3322 S. Memorial Pkwy. 
Hunlsville 35801 
Tel: (205) 533-0090 
Glen White Associates 
7844 Horseshoe Trail 
Huntsville 35802 
Tel (205) 883-9394 

ARIZONA 

BFA 

4426 North Saddle Bag Trail 

ScottsdaJe 85251 

Tel: (602) 994-5400 

Intel Corp. 

8650 N 35ih Avenue 

Phoenix 85021 

Tel: (602) 242-7205 

CALIFORNIA 

Intel Corp. 

15335 Morrison 

Suite 345 

Sherman Oaks 91403 

(213) 986-9510 

TWX: 910-495-2045 

Intel Corp." 

990 E. Arques Ave. 

Suite 112 

Sunnyvale 94086 

Tel; (408) 738 3870 

TWX 910-339-9279 

TWX: 9 10-338-0255 

Mac-I 

2576 Shatluck 

Suite 4B 

Berkeley 94704 

Tel: (415) 843-7625 

Mac-I 

PO Box 1420 

Cupertino 95014 

Tel: (408) 257-98B0 

Intel Corp.* 

1651 Easl 4th Street 

Suite ISO 

Santa Ana 92701 

Tel: (714)835-9642 

TWX: 910-595-1114 

Mac-I 

P.O. Bon 8763 

Fountain Valley 92708 

Tel (714)839-3341 

Mac -I 

20121 Ventura Blvd . Suite 240E 

Woodland Hills 91364 

Tel (2131347-5900 



COLORADO 

Intel Co.p 

60aa East Evans Ave 

Bidrj 1. Suite 260 

Denver 80232 

Tel (3031 753-B086 

TWX 910-931-2289 

Mountamtek 

25921 Fern Gulch Road 

P.O. Bo« 13S5 

Everqreen 80439 

Tel (303) 674-5255 



MICROCOMPUTER AND MEMORY SYSTEM 
SALES AND MARKETING OFFICES 



CONNECTICUT 

Computer Marketing Association 

P O. Box 1 72 

Fair Haven Station 

New Haven 06513 

Tel (203) 789-1013 

Intel Corp 

Peacock Alley 

t Padan.iram Road. Suite 146 

Danbury 06810 

Tel: [203)792-8366 

TWX: 710-456-1199 

FLORIDA 

Pen-Tech Associaies, Inc 

201 SE 15th Terrace 

Deeitieid Beach 33431 

Tel: (305) 421-4989 

Pen-Tech Associaies. Inc. 

111 So Mai Hand Ave. 

Maitland 32751 

Tel: (305) 645-3444 

Intel Corp. 

1001 N W 62nd Streel Suite 406 

Ft Lauderdale 33309 

Tel (3051 771-0600 

TWX 510-956-9407 

Intel Corp 

51S1 Adanson Streel. Suite 105 

Orlando 32804 

Tel: (305) 628-2393 

TWXB10-8S3-9219 

GEORGIA 

Pen-Tech Associates. Inc 

Suite 305 C 

2101 Powers Ferry Roads 

Atlanta 30339 

Tel: (404) 955-0293 

ILLINOIS 

Inlel Corp.* 

1000 Jorie Boulevard 

Suiie 224 

Oakbrook 60521 

Tel: (312)325-9510 

TWX: 910-651-5881 

Dylek-Central Inc 

121 So Wilke Road 

Suite 103 

Arlington Heights 60005 

Tel (3121 394-3380 

TWX 910-687-2267 

INDIANA 

Electro Reps Inc 
941 E 86lh Streel 
Indianapolis 46240 
Tel (317| 255-4147 
TWX 810-341-3217 

Eieclro Reps Inc 

810 Valley-O-Pmes Pkwy 

Ft Wayne 46825 

Tel (219) 637-6211 

IOWA 



'930 Si Andrews Drive N E 
Cedar Rapids 52402 
Tel (319) 393-5510 

KANSAS 

Technical Representatives, i 
8245 Nieman Road Suite -1 
Lene.a 66214 
Tel: (913) B88-0212 3. 4 4 
TWX 910-749-6412 



EUROPEAN MARKETING OFFICES 

BELGIUM FRANCE 

Intel International- mtei Corporation S> 

Rue du Moulin a Papier 74 Rue OArcueil 

51-Boite 1 Silic223 

B-1'60 Brussels 94528 Rungjs Cede» 

Tel: (02) 660 30 10 Tel: (01)687 22 21 

TELEX 24814 TELEX 270475 



ORIENT MARKETING OFFICES 

JAPAN 

Inlel Japan Corporation ' 

Flower H,n-Shinmachi East Bldg 

'-23-9. Shinmachi Setagaya-ku 

Tokyo 154 

Tel (03)426-9261 

TELEX 7B1-28426 



TAIWAN 

Taiwan Automation Co." 
2nd Floor. 224 
Nanking East Road 
Section 3 

Tel: (02) 7710940-3 
TELEX: 11942 TAIAUTO 



MARYLAND 

Glen White Associaies 
57 West Timonium Road 
Timonium 21093 
Tel: (301) 252-7742 
<mel Corp.* 

57 West Timonium Road 
Suite 307 
Timonium 21093 
Tel: (301) 252-7742 
TWX: 710-232-1807 
Mesa Inc. 

119O0 Parklawn Drive 
Rockville 20852 
Tel Wash (3011 881-8430 
Balto (301) 792-0021 

MASSACHUSETTS 

Intel Corp ' 

187 Billerica Road. Suite 14A 

Chelmslord 01824 
Tel: (617)256-6567 
TWX: 710-343-6333 
Computer Marketing Associal 
257 Crescenl Street 
Waliham 02154 
Tel (61 7) B94-7000 

MICHIGAN 

Intel Corp 

26500 Northwestern Hwy 

Suite 401 

Southlield 48075 

Tet. (313) 353-0920 

TWX: 910-420-1212 

TELEX 2 31143 

Lowry *■ Associates, Inc 

135W. North Slreet 

Suite 4 

Brighton 48116 
Tel: (3'3| 227-7067 

MINNESOTA 

Intel Corp 

8200 Normandaie Avenue 

Suite 422 

eioomington 55437 

Tel (612) 835-6722 

TWX 910-576-2867 

MISSOURI 

Technical Representatives. Inc 

Trade Center Bldg 

300 Brookes Drive. Suite 108 

Hazelwood 63042 

Tel: (314) 731-5200 

TWX 910-762-0818 

NEW JERSEY 

Intel Corp 

2 Kilmer Road 

Edison 08817 

Tel (201) 985-9100 

TWX 710-480-6238 

NEW MEXICO 

BFA Corporation 
312 West Parker Road 
Las C'uces 88001 
Tel (505)523-0601 
TWX 910-983-0543 
BFA Corporation 
3705 Westertield. N.E. 
Albuquerque 87111 
Tel (505)292-1212 
TWX 910-989-1157 

NEW YORK 

Intel Corp * 

350 Vanderbitt Motor Pkwy 

Suite 402 

Hauppauge 11787 

Tel (516)231-3300 

TWX 510-227-6236 



SCANDINAVIA 
Intel Scandinavia A S' 
Lyngbyvep 32 2nd Floor 
DK-2100 Copenhagen Easl 

Tel (01) 1*20 00 
TELEX 19567 
Intel Sweden AB* 
Bo« 20092 
5-16120 Bromma 
Sweden 

Tel: (08) 98 53 90 
TELEX: 12261 



HONG KONG 

China Electronics 
Sea Bird House. 9<h Floor 
22-28 Wyndham Slreet 
Hong Kong 



NEW YORK (eont.) 

474 Thurston Road 

Rochester 14619 

Tel: (716] 328-7340 

TWX 510-253-3841 

T- Squared 

4054 Newcourt Avenue 

Syracuse 13206 

Tel (315)463-8592 

TWX 710-541-0554 

T-Squared 

642 Kreag Road 

P.O Box W 

Pittslord 14534 

Tel (716)248-5005 

TELEX: 97-S289 

65 Market Street 
Poughkeepsie 12601 
Tel: (914) 473-2303 
TWX: 510 248-0060 
Measurement Technology, Inc. 
159 Northern Boulevard 
Great Neck 11021 
Tel: (516) 482-3500 

NORTH CAROLINA 

Pen -Tech Associates. Inc 
P.O. Box 5382 
Highpoinl 27262 
Tel: (919) 454-3316 
Glen While Associates 
3700 Computer Drive 
Suite 330 



OHIO 

Intel Corp * 

8312 North Main Slreet 
Dayton 45415 
Tel: (513)890-5350 
TELEX 288-004 
Intel Corp * 
Chagnn-Brainard Bldg 
28001 Chagrin Blvd 
Cleveland 44122 
Tet: (216) 464-2736 
Lowry a Associates inc 
42 East Ratin Road 
Suite 100 
Dayton 45429 
Tel (513)435-4795 
Lowry & Associates. Inc. 
24200 Chagrin Blvd. 



OREGON 

ES Chase Company 
7100 S W. Hampton Street 
Suite 121 
Portland 97223 
Tel (503) 620-9616 

PENNSYLVANIA 
miel Corp ' 
520 Pennsylvania Ave 
Fort Washington 19034 
Tel (215) 542-9444 
TWX 510-661-2077 
Q-ED. Electron.cs 
300 N York Road 
Hatboro 19040 
Tel (215) 674-9600 



ENGLAND 

Intel Corporation (UK) Ltd.' 

Broaodeid House 

4 Between Towns Road 

Cowley. Oxford OX4 3NB 
Tel (0B65)77 14 31 
TELEX 837203 
Intel Corporation (UK | Ltd 
46-50 Beam Street 
Nantwich. Cheshire CWS 5LJ 
Tel (0270)62 65 60 
TELEX: 36620 



KOREA 

Kotam Oigital 

Sam Yung Bldg ;303 

71-2 Bukchang - Oong Chung-Ku 

Seoul 100 
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PENNSYLVANIA (cont. 
Lowry & Associates. Inc. 
Three Parkway Center 
Suite 201 
Pittsburgh 15220 
Tel: (412)922-5110 

TENNESSEE 

Glen White Associates 
Rt :12. Norwood S D 
Jonesboro 37659 
Tel |615|477-BB50 
Glen While Associates 
2523 Howard Road 
Germentown 38138 
Tel (901) 754-0483 
Glen While Associates 
6446 Ridge Lake Road 
Hi.on 37343 
Tel (615)842-7799 

TEXAS 

tnlel Corp. 

G776 S W Freeway 

Suile 550 

Houston 77074 

Tel: (713) 784-3400 

Myc rosy stems Marketing Inc 

13777 N. Central Eipresswav 

Suile 405 

Dallas 75243 

Tel: (214) 238-7157 

TWX 910-867-4763 

Mvcrosyslems Marketing Inc. 

6610 Harwin Avenue. Suite 125 

Houston 77036 

Tel: (713) 783-2900 

Intel Corp.* 

2925 L B.J Freeway 

Suite 100 

Dalles 75234 

Tel (214) 241-9521 

TWX 910-860-5487 

UTAH 

Mountaintek 

3788Brockbank Drive 

Salt Lake City 84117 

Tel (801)266-9617 



Glen White Associates 
P.O. Bo* 1104 
Lvnchbu'q 74505 
Tet (604) 384-6920 
Glen White Associates 
Rl -1. Box 322 
Co'omal Beach 22443 
Tel (804)224-4871 

WASHINGTON 

ES Chase Co 
P O Bo. 8O903 
Seattle 98108 
Tel (206) 762-4824 
TWX 910-444-2298 

CANADA 

Intel Corp 

70 Chamberlain Ave 
Ottawa. Ontario K1S 1V9 
Tel (6131 232-8576 
TELEX 053-4419 



Mi,!' 



(. Inc.* 



iSGrenlell Crescent 
Ottawa Ontario K2G 0G3 
Tel (6131825-4553 
TELEX 053-4585 



8000 Muenchen 2 

Tel 1089)55 81 41 

TELEX 523 177 

Intel Semiconductor GmbH 

Abraham Lincoln Strasse 30 

6200 Wiesbaden i 

Tel: (06121) 74B55 

TELEX 04186183 

Intel Semiconductor GmbH 

Emsthaldenstrasse 17 

D-7000 SlutlgartaO 

Tet (0711)7351506 

TELEX: 7255346 

Intel Semiconductor GmbH 

Wtesenweq 26 

D-6272 Niede-hausen 

Tel (06127) 2314 



INTERNATIONAL DISTRIBUTORS 



Av Pie. Rogue Saeni Pena 1 142 9B 
1035 Buenos Aires 
Tel: 35-6784 

AUSTRALIA 

A J Ferguson (Adelaide) PTY. Ltd 

44 Prospect Rd. 

Prospect 5082 

South Australia 17005 

Tel: 269-1244 

TELEX 82635 

A. J Ferguson Electronics 

34 Herbert Street 

WestRyde. MSW 2114 

Tel AC8 269-1244 

TELEX 82635 

Warburton-Frankie (Sydney) Ply. Lid. 

199 Parramaiia Road 

Auburn. NSW. 2114 

Tel 648-1711 648-1381 

TELEX WARFRAN AA 222SS 

Warburton-Frankie Industries 

(Melbourne) Pty. Lid 

220 Park Streel 

South Melbourne Victoria 3205 

Tel. 699-4909 

TELEX WARFRAN AA 31370 

AUSTRIA 

Bacher EleKtronische Gerate GmbH 

Meidlmger Hauptstrasse 78 



BELGIUM 

inelco Belgium S A 

Avenue Val Duchesse. 3 
B-1160 Brussels 
Tel: (02) 660 00 12 
TELEX: 25441 



'Note New Telephone Number 



Dsim 



t A S 



2860 Soborg 
Tel (01) 67 00 77 
TELEX: 22990 

Scandinavian Semiconductor 
Supply A S 
tJannasgade 18 
DK-2200 Copenhagen N 
Tel (01)83 50 90 
TELEX 19037 

FINLAND 
Oy Fintronic AS 
Loennrotinfcatu 35D 
SF 00180 

Helsinki 18 
Tet: (90)664 451 
TELEX: 12426 

FRANCE 

Tekelec Airtronic 
Cite des Bmyeres 
Rue Carle Vernal 



Sch. . _. ... 

D-2085 Quickborn-Hambu.g 

Tel (04106) 612' 

TELEX: 02-13590 

Electronic 2000 Vertriebs GmbH 

Neumarkter Strasse 75 

D-3O00 Muenchen B0 

Tel: |089) 434061 

TELEX: 522561 

Jermyn GmbH 

Posttach 1146 

0-6277 Kamberg 

Tel: (06434) 600S 

TELEX 484426 



INDIA 

Electronics International 
128 Mahatma Gandhi Road 
Secunderabad 
Tel 73720 
TELEX 015-363 
CABLE GUNTICO 

ISRAEL 

Eastronics Ltd * 
11 Roianis Street 
P.O Bo* 39300 
Tel- Aviv 

Tel: 475151 
TELEX: 33638 

ITALY 

Eledra3SSPA ' 

Viale Elveita. 18 

20154 Milan. 

Tel: (02) 3493041 

TELEX: 39332 

Eledra3SS.P.A.- 

Via Paolo Gaidano. 141 D 

10137 Torino 

TEL: (01 1)30 97 097 -30 97 114 

Eledra3SSPA " 

Via Giuseppe Valmarana. 63 

D0139 Rome Italy 

Tel: (06) 81 27 290-8127 324 

TELEX: 63051 

JAPAN 

Pan Electron 

No 1 Higashikaia-Machi 

Midon-Ku. Yokohama 226 

Tel (045)471-8811 

TELEX 781-4773 

Ryoyo Electric Corp 

Konwa Bldg. 

1-12-22. Tsuki|i, 1-Chome 

Chuo-Ku. Tokyo 104 

Tet: (03)543-7711 

Nippon Micro Computer Co. Ltd 

Muisumi Btdg 4-5-21 Kojimachi 

Chiyoda-ku. Tokyo 102 

Tel (03) 2304041 



NETHERLANDS 

C.N. Rood BV 
Con Vender 
Lindenstraat. 13 
Post bus 42 
Rijswijk 2H210Q 
Tel: 070-996360 
TELEX: 31238 
inelco Nederiand 
AFD EleMronic 
Joan Muyskenweg 22 
NL-1006 Amsterdam 
Tel (020)934824 
TELEX 14622 

NEW ZEALAHD 

W. K. McLean Ltd. 

103-5 Fetton Matthew Avenue 

Glenn Innes. Auckland 

Tel: 587-037 

TELEX: NZ2763 



N-OslO 2 

Tel: (02) 55 38 93 

TELEX: 16963 

PORTUGAL 

Componentes E Electronics LDA 
Av Miguel Bom bar da. 133 
Lisboa 1 
Tel: 11945313 

SOUTH AFRICA 

Electronic Building Elements 

P.O. Box 4609 

Pretoria 

Tel 7B92 21 

TELEX: 30181 

SPAIN 

Interlace 

Ronda San Pedro 22 

Barcelona 10 
Tel: 301 78 51 



SWEDEN 

Nordisk EleelronihAB 

Fack 

S-10380 Stockholm 7 

Tel: [08) 248340 

TELEX 10547 

SWITZERLAND 

industrade AG 
Gem sen strasse 2 

Postcheck 80- 21190 
CH-8021 Zurich 
Tel: (01) 60 22 30 
TELEX: 56788 

UNITED KINGDOM 

Rapid Recall. Ltd. 

11-15 Belterlon Street 

Orury Lane 

London WC2H 9BS 

Tel (01)379-6741 

TELEX 28752 

G.E.C. Semiconductors Ltd 

Easl Lane 

Wembley HA9 7PP 

Middlesex 

Tel (01)904-9303 

TELEX: 923429 

Jermyn Industries 

Vestry Estate 

Seven oaks. Keit 

Tel: 10732) f 14 

TELEX: 9514* 

"Sintrom Electronics Lid.* 

Arkwright Road 

Reading Berkshire RG20LS 

Tel (0734I 85464 

TELEX: 847395 



* Field Application Location 
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3065 Bowers Avenue 
Santa Clara. California 95051 
Tel: (408) 987-S0S0- * 
TWX: 910-338-0026 
TELEX: 34-6372 



MICROCOMPUTER 
SALES AND 



AND MEMORY COMPONENT 
MARKETING OFFICES 



U.S. AND CANADIAN SALES OFFICES 



ALABAMA 

Glen While Associates 
7844 Horseshoe Trail 
Huntsville 35802 
Tel: (205) 883-9394 

ARIZONA 

Intel Corp 

8650 N. 35lh Avenue 
Phoenix 85031 
Tel: (602)242-7205 

CALIFORNIA 

Intel Corp. 

15335 Morrison 

Suite 345 

Sherman Oaks 91403 

(2131 986-9510 

TWX 910-495-2045 

Intel Corp * 

990 E. Arques Ave. 

Suite 112 

Sunnyvale 94036 

Tel: (408) 738-3870 

TWX: 910-339-9279 

TWX: 910-338-0255 

Mac-I 

2576 Shattuck 

Suite 4B 

Berkeley 94704 

Tel. (415)843-7625 

Mac-I 

P.O. Box 1420 

Cupertino 95014 

Tel. (408) 257-9880 

Earle Associates, Inc. 

4805 Mercury Streel 

Suite L 

San Diego 92111 

Tel: (714) 278-5441 

TWX: 910-335-1565 

Mac-I 

P.O. Box 8763 

Fountain Valley 92708 

Tel (714)839-3341 

Intel Corp.* 

1651 East 4th Streel 

Suite f50 

Santa Ana 92701 

Tel: (714) 835 9642 

TWX: 910-595-1114 

COLORADO 

Intel Corp. 

6000 East Evans Ave 
Bldq. 1, Suite 260 
Denver 80222 
Tel: (303) 758-8086 
TWX: 910-931-2289 



CONNECTICUT 

Intel Corp. 

Peacock Alley 

1 Padanaram Road. Suite 146 

Oanbury 06810 

Tel: (203) 792-8366 

TWX: 710-456-1199 

FLORIDA 

Intel Cofp. 

1001 N W. 62nd Street. Suite 406 

Ft. Lauderdale 33309 

Tel: (305) 771-0600 

TWX: 510-956-9407 

Intel Corp. 

5151 Adanson Street, Suite 105 

Orlando 32804 

Tel (305) 628-2393 

TWX: 810-853-9219 

ILLINOIS 

Intel Corp. 

1000 Jorie Boulevard 

Suite 224 

Oakbrook 60521 

Tel: (312)325-9510 

TWX: 910-651-5881 

INDIANA 

Electro Reps Inc. 
941 E. 86lh Streel 
Indianapolis 46240 
Tel: (317) 255-4147 
TWX: 810-341-3217 
Electro Reps Inc. 
B10 Valley-O-Pines Pkwy. 
Ft. Wayne 46825 
Tel: (219) 637-6211 

IOWA 

Technical Representatives. Inc. 

St. Andrews Building 

1930 St. Andrews Drive N.E. 

Cedar Rapids 52402 

Tel: (319) 393-5510 

KANSAS 

Technical Representatives. Inc. 
8245 Nieman Road. Suite -100 
Lenexa 66214 
Tel: (913) 888-0212, 3. & 4 
TWX: 910-749-6412 

MARYLAND 

Glen White Associates 

57 West Timonium Road 

Timomum 21093 

Tel: (301) 252-6360 

Intel Corp.* 

57 West Timonium Road 

Suite 307 

Timonium 21093 

Tel: (301) 252-7742 

TWX: 710-232-1807 



EUROPEAN MARKETING OFFICES 



BELGIUM 

Intel International* 
Rue du Moulin a Papier 
51-Bpite 1 
B-1160 Brussels 
Tel: (02) 660 30 10 
TELEX: 24614 



FRANCE 

Intel Corporation. S.A.R.L." 

74. Rue D'Arcueil 

Si lie 223 

94528 Rungis Cedex 

Tel: (01) 687 22 21 

TELEX 270475 



ORIENT MARKETING OFFICES 

JAPAN 

Intel Japan Corporation" 

Flower Hiii-Shinmaehi East Bldg 

1-23-9. Shinmachi, Setagaya-ku 

Tokyo 154 

Tel: (031426-9261 

TELEX: 781-28426 



TAIWAN 

Taiwan Automation Co." 

2nd Floor. 224 

Nanking East Road 

Section 3 

Taipei 

Tel: (02) 7710940-3 

TELEX: 11942 TAIAUTO 



MASSACHUSETTS 

Intel Corp * 

187 Biiienca Road, Suite 14A 

Chelmsford 01824 

Tel: (617) 256-6567 

TWX: 710-343-6333 

MICHIGAN 

Intel Corp. 

26500 Northwestern Hwy. 

Suite 401 

Southlieid 48075 

Tel: (313) 353-0920 

TWX 910-420-1212 

TELEX: 2 31143 

MINNESOTA 

Intel Corp. 

8200 Normandale Avenue 
Suite 422 

Bloomington 55437 
Tel (612)835-6722 
TWX 910-576-2867 

MISSOURI 

Technical Representatives, Inc. 

Trade Center Bldg. 

300 Brookes Drive. Suite 108 

Hazel wood 63042 

Tel. (314) 731-5200 

TWX 910-762-0618 

NEW JERSEY 

Intel Corp. 
2 Kilmer Road 
Edison 08817 
Tel (201) 985-91DQ 
TWX: 710-480-6238 

NEW YORK 

Intel Corp ' 

350 Vanderbilt Motor Pkwy. 

Suite 402 

Hauppauge 11787 

Tel (516) 231-3300 

TWX 510-227-6236 

Intel Corp. 

474 Thurston Road 

Rochester, NY. 14619 

Tel: (716) 328-7340 

TWX 510-253-3841 

T- Squared 

4054 Newcourt Ave. 

Syracuse 13206 

Tel: (315) 463-8592 

TWX: 710 541-0554 

T-Squared 

642 Kreag Road 

P.O. Box W 

Piltsford 14534 

Tel (716) 248-5005 

TELEX: 97-8289 



SCANDINAVIA 

Intel Scandinavia A/S' 

Lyngbyvej 32 2nd Floor 

DK-2100 Copenhagen Easl 

Denmark 

Tel: (01) 18 20 00 

TELEX 19567 

Intel Sweden AB" 

Box 20092 

S-16120 Bromma 

Sweden 

Tel: (08)98 53 90 

TELEX: 12261 



HONG KONG 

China Electronics 
Sea Bird House. 9th Floor 
22-28 Wyndham Street 
Hong Kong 



NEW YORK (cont.) 

Intel Corp. 

85 Market Street 

Poughkeepsie, New York 12601 

Tel (914)473-2303 

TWX: 510-248-0060 

NORTH CAROLINA 
Glen White Associates 
3700 Computer Dr., Suite 330 
Raleigh 27609 
Tel: (919) 787-7016 

OHIO 

Intel Corp." 

8312 North Main Street 

Dayton 45415 

Tel: (513)890-5350 

TELEX. 2B6-004 

Intel Corp.* 

Chagrin-Brainard Bldg. 

28001 Chagrin Blvd. 

Cleveland 44122 

Tel (216) 464-2736 

OREGON 

ES Chase Company 
7100 S.W. Hampton Street 

Suite 121 
Portland 97223 
Tel: (503) 620-9616 

PENNSYLVANIA 

Intel Corp.* 
520 Pennsylvania Ave. 
Fort Washington 19034 
Tel: (215) 542-9444 
TWX 510-661-2077 

TENNESSEE 

Glen White Associates 
Rt. -12. Norwood S, D 
Jonesboro 37659 
Tel (615)477-8850 
Glen White Assoc rates 
2523 Howard Road 



Gerr 



r)3fli: 



Tel (9011 754-0483 
Glen White Associates 
6446 Ridqe Lake Road 
Hixon 37343 
Tel: (615)842-7799 



ENGLAND 

Intel Corporation (U.K.) Ltd." 

Broadfield House 

4 Between Towns Road 

Cowley 0«lordOX4 3NB 

Tel 108651 77 14 31 

TELEX 837203 

Intel Corporation (U.K.) Ltd 

46-50 Beam Street 

Nantwich Cheshire CWS SU 

Tel (0270) 62 65 60 

TELEX 36620 



KOREA 

Koram Digital 

Sam Yung Bldg. ^303 

71-2 Bukchang . Dong Chung-K 

Seoul 100 
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TEXAS 

Intel Corp. 

6776 S.W. Freeway 

Suite 550 

Houston 77074 

Tel: (713) 784-3400 

Mycrosystems Marketing Inc. 

13777 N. Central Expressway 

Suite 405 

Dallas 75243 

Tel (214)238-7157 

TWX: 910-887-4763 

Mycrosystems Marketing Inc. 

6610 Harwin Avenue. Suite 125 

Houston 77036 

Tel: (713) 783-2900 

Intel Corp.* 

2925 L.BJ. Freeway 

Suite 100 

Dallas 75234 

Tel: (214) 241-9521 

TWX: 910-860 5487 

VIRGINIA 

Glen White Associates 
P.O. Box 1104 
Lynchburg 24505 
Tel (804) 384-6920 
G'en White Associates 
Rt --1. Box 322 
Colonial Beach 22443 
Tel: (804)224-4871 

WASHINGTON 

ES Chase Co. 
P.O Box 80903 
Seattle 98108 
Tel: (206) 762-4824 
Twx: 910-444-2298 



CANADA 
Intel Corp. 

70 Chamberlain Ave. 
Ottawa Ontario Kis 1V9 
Tel- (613)232-8576 
TELEX: 053-4419 
Multitek Inc.' 
l5Grenlell Crescent 
Ottawa Ontario K2G 0G3 
Tel 1613)825-4553 
TELEX 053-4585 



GERMANY 

Intel Semiconductor GmbH* 

SeidlStrasse 27 

8000 Mue->chen 2 

Tel (089)55 81 41 

TELEX 523 177 

Intel Semiconductor GmbH 

Abraham Lincoln Strasse 30 

6200 Wiesbaden 1 

Tel (06121) 74855 

TELEX 04186183 

Intel Semiconductor GmbH 

Ernsthatdenstrasse 17 

D-7000 Stuttgart 80 

Tel: (0711) 7351506 

TELEX 7255346 

Intel Semiconductor GmbH 

Wissenweq 26 

D-6272 Niede-hausen 

Tel 106127} 2314 



INTERNATIONAL DISTRIBUTORS 
ARGENTINA 

S.I.E.S.A. 

Av Pte Rogue Saenz Pena 1142 9B 

1035 Buenos Aires 

Tel: 35-6784 



AUSTRALIA 

A. J. Ferguson (Adelaide) PTY. Ltd. 

44 Prospect Rd. 

Prospect 5082 

South Australia 17005 

Tel: 269-1244 

TELEX: 82635 

A. J Ferguson Electronics 

34 Herbert Street 

West Ryde, N.S.W. 2114 

Tel ACS 269-1244 

TELEX: 82635 

Warburton-Frankie (Sydney) Ply. Ltd. 

199 Parramatta Road 

Auburn. N.S.W. 2114 

Tel: 646-1711. 648-1381 

TELEX: WARFRAN AA 22265 

Warburton-Frankie Industries 

(Melbourne) Ply. Ltd. 

220 Park Streel 

South Melbourne, Victoria 3205 

Tel. 699-4999 

TELEX WARFRAN AA 31370 

AUSTRIA 

Bacher Elektronische Gerate GmbH 

Meidlmger Hauptslrasse 78 

A 1120 Vienna 

Tel (0222) 83 63 96 

TELEX: (01) 1532 

BELGIUM 

Inelco Belgium S A 
Avenue Val Duchesse, 3 
B-1160 Brussels 
Tel: (02) 660 DO 12 
TELEX: 25441 

"Noie New Telephone Number 






DENMARK 

Lyngso Komponenl A S 

Ostmarken 4 

2560 Soborg 

Tel: (01) 67 00 77 

TELEX: 22990 

Scandinavian Ser 

Supply A S 

Nannasgade 18 

DK-2200 Copenhagen N 

Tel (01) 83 50 90 

TELEX: 19037 

FINLAND 

Oy Fintronie AB 

Loennrotinkalu 35D 

SF 00180 

Helsinki 18 

Tel: (90) 664 451 

TELEX: 12426 

FRANCE 

Tekelec Airtronic 
Cite des Bruyeres 
Rue Carle Vernet 
92310 Sevres 
Tel: [1)027 75 35 
TELEX 250997 

GERMANY 

Allred Neye Enatachnik GmbH 

Schillefstrasse 14 

D-2085 Quichbom-Hamburg 

Tel: (04106) 6121 

TELEX. 02-13590 

Electronic 2000 Vertriebs GmbH 

Neumarkter Strasse 75 

D-B000 Muenchen 80 

Tel: (089) 434061 

TELEX: 522561 

Jermyn GmbH 

Postlach 1146 

D-6277 Kamberq 

Tel: (06434) 6005 

TELEX: 484426 



INDIA 

Electronics International 
128 Mahalma Gandhi Road 
Secunderabad 
Tel: 73720 
TELEX 015-363 
CABLE: GUNTlCO 

ISRAEL 

Eastronics Ltd." 
11 Rozams Street 
P.O. Box 39300 

Tel: 475151 
TELEX 33638 

ITALY 

EledraSSS.PA." 

Viale Elvezia. 18 

20154 Milan, 

Tel (02)3493041 

TELEX 39332 

Eledra3SS.P A." 

Via Paolo Gaidano. 141 D 

10137 Torino 

TEL: (011)30 97 097-30 97 114 

Eledra 3S SPA.* 

Via Giuseppe Valmarana. 63 

0O139 Rome. Italy 

Tel (06(81 27 290-81 27 324 

TELEX 63051 

JAPAN 

Pan Electron 
No 1 Higashikata-Machi 
Midori-Ku. Yokohama 226 
Tel: (045)471-8811 
TELEX: 781-4773 



JAPAN (cont.) 

Ryoyo Electric Corp 

Konwa Bldg. 

1-12-22. Tsukiji. t-Chome 

Chuo-Ku. Tokyo 104 

Tel: (03)543-7711 

Nippon Micro Computer Co Ltd. 

Wutsumi Bldg 4-5-21 Koiimachi 

Chiyoda-ku. Tokyo 102 

Tel (03| 230-0041 

NETHERLANDS 

Inelco Nedertand 
AFD Elektronic 
Joan Muyskenweg 22 
NL-1006 Amsterdam 
Tel: (020)934824 
TELEX: 14622 

NEW ZEALAND 

W K. McLean Ltd 

103-5 Felton Matthew Avenue 

Glenn Innes. Auckland 

Tel 587-037 

TELEX: NZ2763 

NORWAY 

NordiSk Elektronik (Norge) A/S 

Mustads Vei 1 

N-O5I0 2 

Tel (02) 55 38 93 

TELEX: 16963 

PORTUGAL 

Componentes E Electronica LDA 
Av Miguel Bombarda. 133 
Lisboa 1 
Tel: 119 45 313 

SOUTH AFRICA 

Electronic Building Elements 

P.O. Box 4609 

Pretoria 

Tel: 78 92 21 

TELEX. 30181 



SPAIN 

interface 

Ronda San Pedro 22 

Barcelona 10 

Tel 301 78 51 



S-10380 Stockholm 7 
Tel (08) 248340 
TELEX 10547 

SWITZERLAND 

fndustrade AG 
Gemsenslrasse 2 
Postcheck BO- 21190 
CH-8021 Zurich 
Tel (01) 60 22 30 
TELEX: 56788 

UNITED KINGDOM 

Rapid Recall. Ltd. 

11-15 Betterton Streel 

DruryLane 

London WC2H 9BS 

Tel (011 379-6741 

TELEX: 28752 

G.E.C. Semiconductors Ltd. 

East Lane 

Wembley HA9 7PP 

Middlesex 

Tel: (01) 904-9303 

TELEX 923429 

Jermyn Industries 

Vestry Estate 

Sevenoaks. Kent. 

Tel: 10732) 50144 

TELEX: 95142 



"Field Application Location 



intel 



3065 Bowers Avenue 
Santa Clara, California 95051 
Tel: (408) 987-8080" • 
TWX: 910-338-0026 
TELEX: 34-6372 
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U.S. AND CANADIAN DISTRIBUTORS 
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ALABAMA 

t'Hamilton/Avnet Electronics 

805 Oser Drive NW 

Huntsville 35805 

Tel: (205) 533-1170 

Pioneer 

1207 Putman Drive NW 

Huntsville 35805 

Tel: (205)837-9300 

ARIZONA 

t'Hamilton/Avnet Electronics 
8155 North 21st Street 
Phoenix 85021 
Tel: (602) 275-7851 
Liberty/Arizona 
3130 N. 27th Avenue 
Phoenix 85017 
Tel: (602) 257-1272 
TELEX: 910-951-4282 

CALIFORNIA 

t'Avnet Electronics 

350 McCormick Avenue 

Costa Mesa 92626 

Tel: (714) 754-6111 

Tel: (213) 558-2345 

t'Hamilton/Avnet Electronics 

575 E. Middlefield Road 

Mountain View 94040 

Tel: (415) 961-8600 

t'Hamilton/Avnet Electronics 

8917 Complex Drive 

San Diego 92123 

Tel: (714) 279-2421 

t'Hamilton Electro Sales 

10912 W. Washington Boulevard 

Culver City 90230 

Tel: (213)558-2121 

fCramer/San Francisco 

720 Palomar Avenue 

Sunnyvale 94086 

Tel: (406) 739-3011 

Cramer/Los Angeles 

17201 Daimler Street 

Trvine 92714 

Tel: (714) 979-3000 

f Liberty Electronics 

124 Maryland Street 

El Segundo 90245 

Tel: (213) 322-8100 

Tel: (714) 638-7601 

TWX: 910-348-7140 

tLiberty/San Diego 

8284 Mercury Court 

San Diego 92111 

Tel: (714) 565-9171 

TELEX: 910-335-1590 

tElmar Electronics 

2288 Charleston Road 

Mountain View 94040 

Tel: (415) 961-3611 

TELEX: 910-379-6437 

COLORADO 

tElmar/Denver 
6777 E. 50th Avenue 
Commerce City 80022 
Tel: (303) 287-9611 
TWX: 910-936-0770 
t*Hamilton/Avnet Electronics 
5921 No. Broadway 
Denver 80216 
Tel: (303) 545-1212 

CONNECTICUT 

tCramer/Connecticut 
35 Dodge Avenue 
North Haven 06473 
Tel: (203) 239-5641 
t'Hamilton/Avnet Electronics 
643 Danbury Road 
Georgetown 06829 
Tel: (203) 762-0361 
Harvey Electronics 
112 Main Street 
Norwalk 06851 
Tel: (203) 853-1515 

FLORIDA 

Cramer/E,W. Hollywood 

4035 No. 29th Avenue 

Hollywood 33020 

Tel: (305) 921-7878 

t'Hamilton/Avnet Electronics 

6800 Northwest 20th Ave. 

Ft. Lauderdale 33309 

Tel: (305)971-2900 

Cramer/EW Orlando 

345 No. Graham Ave. 

Orlando 32814 

Tel: (305) 894-1511 

Pioneer 

6220 S. Orange Blossom Trail 

Suite 412 

Orlando 32809 

Tel: (305) 859-3600 

GEORGIA 

tCramer 

6456 Warren Drive 
Norcross 30071 
Tel: (404) 448-9050 

"Note New Telephone Number 



GEORGIA (COnt.) 

t'Hamilton/Avnet Electronics 
6700 I 85. Access Road, #11 
Norcross 30071 
Tel: (404)448-0800 

ILLINOIS 

tCramer/Chicago 
1911 So. Busse Rd. 
Mt. Prospect 60056 
Tel: (312) 593-8230 
t'Hamilton/Avnet Electronics 
3901 No. 25th Ave. 
Schiller Park 60176 
Tel. (312) 678-6310 
Pioneer/Chicago 
1551 Carmen Drive 
Elk Grove Village 60006 
Tel: (312)437-9680 

INDIANA 

tPioneer/lndiana 
6408 Castleplace Drive 
Indianapolis 46250 

Tel: (317) 849-7300 
Sheridan Sales 
8790 Purdue Road 
Indianapolis 46268 

Tel: (317) 297-3146 

KANSAS 

t'Hamilton/Avnet Electronics 
9219Quivira Road 
Overland Park 6621 5 
Tel: (913) 888-8900 

MARYLAND 

tCramer/EW Washington 
16021 Industrial Drive 
Gaithersburg 20760 
Tel: (301) 948-0110 
'-'Hamilton Avnet 
7235 Standard Drive 
Hanover 21076 
Tel: (301) 796-5000 
t Pioneer/Washington 
9100 Gaither Road 
Gaithersburg 20760 
Tel: (301) 948-0710 
TWX: 710-828-0545 

MASSACHUSETTS 

(Cramer Electronics Inc. 
85 Wells Avenue 
Newton 02159 
Tel: (617)969-7700 
t'Hamilton/Avnet Electronics 
100 E. Commerce Way 
Woburn 01801 
Tel: (617) 933-8000 

MICHIGAN 

tSheridan Sales Co. 
24543 fndoplex Circle 
Farmington Hills 48024 
Tel: (313) 477-3800 
f Pioneer/Michigan 
13485 Stamford 
Livonia 48150 
Tel: (313} 525-1800 
t'Hamilton/Avnet Electronics 
32487 Schoolcraft Road 
Livonia 48150 
Tel: (313) 522-4700 
TWX: 810-242-8775 

MINNESOTA 

f Industrial Components 

5280 West 74th Street 

Minneapolis 55435 

Tel: (612) 831-2666 

tCramer/Bonn 

7275 Bush Lake Road 

Edina 55435 

Tel: (612)835-7811 

t'Hamilton/Avnet Electronics 

7683 Washington Avenue So. 

Edina 55435 

Tel: (612) 941-3801 

MISSOURI 

t'Hamilton/Avnet Electronics 

396 Brookes Lane 

Haze I wood 63042 

Tel: (314) 731-1144 

Sheridan Sales 

110 S. Hwy. 67, Suite 10 

Florissant 63031 

Tel: (314) 837-5200 

NEW JERSEY 

Cramer/Pennsylvania, Inc. 
12 Springdale Road 
Cherry Hill Industrial Center 
Cherry Hill 08034 
Tel: (609) 424-5993 
TWX: 710-896-0908 
t'Hamilton/Avnet Electronics 
218 Little Falls Road 
Cedar Grove 07009 
Tel: (201) 239-0800 
TWX: 710-994-5787 
Cramer/New Jersey 
1 Cardinal Drive 
Little Falls 07424 
Tel: (201) 785-4300 



NEW JERSEY (cont.) 

tHarvey Electronics 

389 Passaic Avenue 

Fairfield 07006 

Tel: (201)227-1262 

t'Hamilton/Avnel Electronics 

113 Gaither Drive 

East Gate Industrial Park 

Mt. Laurel 08057 

Tel: (609) 234-2133 

TWX: 710-897-1405 

NEW MEXICO 

t'Hamilton/Avnet Electronics 

2524 Baylor Drive, S.F-. 

Albuquerque 87119 

Tel: (505) 765-1500 

NEW YORK 

tCramer/ Roc h ester 

3000 Winton Road South 

Rochester 14623 

Tel: (716) 275-0300 

t'Hamilton/Avnet Electronics 

167 Clay Road 

Rochester 14623 

Tel: (716)442-7820 

Cramer/Syracuse 

6716 Joy Road 

East Syracuse 13057 

Tel: (315) 437-6671 

t'Hamilton/Avnet Electronics 

6500 Joy Road 

E.Syracuse 13057 

Tel: (315)437-2641 

fCramer/Long Island 

129 Oser Avenue 

Hauppauge, L.I. 11787 

Tel: (516) 231-5600 

TWX: 510-227-9863 

t'Hamilton/Avnet Electronics 

70 Slate Street 

Westbury, L.I. 11590 

Tel: (516) 333-5600 

TWX: 510-222-8237 

tHarvey Electronics 

60 Crossways Park West 

Woodbury 11797 

Tel: (516)921-8700 

NORTH CAROLINA 

tCramer Electronics 

938 Burke Street 

Winston-Salem 27102 

Tel: (919) 725-8711 

Pioneer/Carolina 

2906 Baltic Avenue 

Greensboro 27406 

Tel: (919) 273-4441 

TWX: 510-925-1114 

Hamtlton/Avnel Electronics, Inc. 

2803 Industrial Drive 

Raleigh 27609 

Tel: (919) 829-8030 

OHIO 

tSheridan Sales Co. 

2501 Neff Road 

Dayton 45414 

tCramer/Cleveland 

5835 Harper Road 

Cleveland 44139 

Tel: (216) 248-8400 

t'Hamilton/Avnet Electronics 

118 Westpark Road 

Dayton 45459 

Tel: (513) 433-0610 

TWX: 810-450-2531 

| Pioneer/Dayton 

1900 Troy Street 

Dayton 45404 

Tel: (513) 236-9900 

t Sheridan Sales Co. 

10 Knollcrest Drive 

Cincinnati 45222 

Tel: (513) 761-5432 

TWX: 810-461-2670 

f Pioneer/Cleveland 

4800 E. 131st Street 

Cleveland 44105 

Tel: (216) 587-3600 

t'Hamilton/Avnet Electronics 

761 Beta Drive, Suite E 

Cleveland 44143 

Tel: (216) 461-1400 

tSheridan Sales Co. 

23224 Commerce Park Road 

Beachwood 44122 

Tel: (216)831-0130 

OKLAHOMA 

tComponents Specialties, Inc. 

7920 E. 40th Street 

Tulsa 74145 

Tel: (918) 664-2820 

OREGON 

tAlmac/Stroum Electronics 

4475 S.W. Scholls Ferry Rd. 

Portland 97225 

Tel: (503) 292-3534 

PENNSYLVANIA 

tSheridan Sales Co. 

1717 Penn Avenue, Suite 5009 

Pittsburgh 15221 

Tel: (412)244-1640 

Pioneer/Pittsburgh 

560 Alpha Drive 

Pittsburgh 15238 

Tel: (412) 762-2300 



PENNSYLVANIA (cont.) 
Pioneer/Delaware 
141 Gibraltar Road 
Horsham 19044 
Tel: (215) 674-4000 
TWX: 510-665-6778 

TENNESSEE 

Sheridan Sales Co. 
6900 Office Park Circle 
Knoxville 37919 
Tel: (615) 588-5836 

TEXAS 

Component Specialties Inc. 

6330 Burnett Road, Suite 101 

Austin 78758 

Tel: (512) 459-3308 

tCramer Electronics 

13740 Midway Road 

Dallas 75240 

Tel: (214) 661-9300 

t'Hamilton/Avnel Electronics 

4445 Sigma Road 

Dallas 75240 

Tel: (214) 661-8661 

t'Hamilton/Avnet Electronics 

3939 Ann Arbor 

Houston 77063 

Tel: (713) 780-1771 

tComponent Specialties, Inc. 

10907 Shady Trail, Suite 101 

Dallas 75220 

Tel: (214) 357-6511 

(Component Specialties, Inc. 

8585 Commerce Park Drive, Suite 590 

Houston 77036 

Tel: (713) 771-7237 

UTAH 

t'Hamilton/Avnet Electronics 
1585 West 2100 South 
Salt Lake City, 84119 
Tel: (801) 972-2800 

WASHINGTON 

t'Hamilton/Avnet Electronics 
13407 Northrup Way 
Bellevue 98005 
Tel: (206) 746-8750 
tAlmac/Stroum Electronics 
5811 Sixth Ave. South 
Seattle 98108 
Tel: (206) 763-2300 
tLiberty Electronics 
1750 132nd Avenue NE 
Bellevue 98005 
Tel: (206)763-8200 

WISCONSIN 

t'Hamilton/Avnet 
2975 Moorland Road 
New Berlin 53151 
Tel: (414) 784-4510 



CANADA 

ALBERTA 

tL A. Varah Ltd. 
4742 14th Slreet N.E. 
Calgary T2E 6LT 
Tel: (403) 276-6818 
Telex: 13 825 89 77 
BRITISH COLUMBIA 
R.A. Varah LW. 
2077 Alberta Slreet 
Vancouver V5Y 1C4 
Tel: (604)873-3211 
TWX: 610-929-1068 
Telex: 04 53167 

ONTARIO 

L.A. Varah, Ltd. 

505 Kenora Avenue 

Hamilton L8E-3P2 

Tel: (416)561-9311 

TELEX: 061-8349 

t'Hamilton/Avnet Electronics 

3688 Nashua Drive, Unit GH 

Mississauga L4V IM5 

Tel: (416) 677-7432 

TWX: 610-492-8867 

t'Hamilton/Avnet Electronics 

1735 Courtwood Cresc. 

Ottawa K2C 3J2 

Tel: (613) 226-1700 

TWX: 610 562-1906 

tZentronics 

141 Catherine Street 

Ottawa, Ontario K2P 1C3 

Tel: (613) 238-6411 

tZentronics 

99 Norfinch Dr. 

Downsview, Ontario M3N 1W8 

Tel: (416)635-2822 

Telex: 02-021694 

QUEBEC 

t'Hamilton/Avnet Electronics 

2670 Paulus 

St. Laurent H4S1G2 

Tel: (514) 331-6443 

TWX: 610-421-3731 

tZentronics 

8146 Montview Road 

Town of Mount Royal, Montreal 

Quebec H4P 2L7 

Tel: (514)735-5361 

Telex: 05-827535 
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DISKETTE AND PAPER TAPE 
ORDERING PROCEDURE 

DISKETTE ORDERING PROCEDURE 

The guidelines below apply to all diskette orders, with the exception of Resident 
Language Translators (Section 9). Program diskettes, unless otherwise noted 
on the author's program abstract, are available in source code only. 

1. Three program minimum on all diskette orders. 

2. A three program diskette is priced at $55. 00; add $15. 00 for each 

additional program. 

3. Your check or money order is required with orders under $100. 00. 

Listings will not be included with diskette orders. However, when required, 
appropriate User's Guide will be sent. Diskette Program Order Forms are' 
enclosed in your Insit e ™ Manual, Section 3. Send your order to Mel 
Corporation, User's Library, 3065 Bowers Avenue, Santa Clara, CA 95051. 



RESIDENT LANGUAGE TRANSLATORS 



Due to program length, programs in Section 9 are priced separately. Insit e 
members can either order the programs individually or as a complete package. 
Program Diskettes are available in source code unless otherwise noted. 

Reference 
Number Description Price 

F1 Sma11 $ 35.00 

F2 ML/80 Structured Assembler for 8080 $ 70. 00 

F3 Basic M $ 35 * 00 

F7 LLL Basic Interpreter 

F8 Octal Debugging Routine $ 35 * 00 

F9 4004/4040 Cross Assembler for Intellec 800 $ 25. 00 

(Paper Tape and Diskette available in object code only) 

F10 8008 Cross Assembler for Intellec 800 $ 25. 00 

(Paper Tape and Diskette available in object code only) 

Fll 8080 Macro Assembler for Intellec 8/MOD80 $ 15. 00 

(Source Listing available only) 

F12 8008 Macro Assembler for Intellec 8/MOD8 $ 15. 00 

(Source Listing available only) 

F13 Sequential Pascal Compiler PAS80 $ 70. 00 

(Available on diskette only) 

F14 RIA80 * $ 25#00 

F15 LLL/Chernack Basic Interpreter $ 35. 00 

Package Price for all Resident Language Translators (Section 9) $320. 00 



Ordering Procedure page 2 



PAPER TAPE ORDERING PROCEDURE 

The majority of Library Programs are available in source code. However, 
paper tapes for Resident Language Translators, Section 9, are only offered 
in object code. Program Order Forms are in this section of your Insit e 
Program Library Manual. A prepaid $15. 00 handling fee is charged for 
each program, which includes paper tape and listing. Send your order to 
Intel Corporation, User's Library, 3065 Bowers Avenue, Santa Clara, 
California 95051. 



PROGRAM SUBMITTAL PROCEDURE 

All programs submitted for our review must follow the guidelines listed below: 

1. Programs must be written in standard Intel Assembly Language, 

PL/M or FORTRAN. These languages are documented in the 
following manuals: 

a. 8080/8085 Assembly Language Programming Manual #9800301C 

b. 8008 Assembly Language Programming Manual #98-019B 

c. 4004/4040 Assembly Language Programming Manual #98-025A 

d. 8008/8080 PL/M Programming Manual #98-108A 

e. PL/M 80 Programming Manual #98-268B 

f. MCS 48/UPI 41 Assembly Language Manual #98-255B 

g. FORTRAN-80 Programming Manual #9800481 

2. Submitted programs must be error free. No consideration will be given 

to partial programs or duplication of existing programs. All accepted 
programs should assemble or compile correctly without syntax errors. 
An example of program operation must be included. 

3. Programs must be supplied in both machine readable source form and 

machine generated listing along with a completed submittal form 
(copies of this form can be found in this section). On the back of the 
Library Submittal Form are detailed instructions for program 
submittal which should be closely adhered to. These documentation 
standards are maintained to assure the usability of each library 
program by other users. 



insite iNTEL * users library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004/4040 D8008 D8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 




Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



Programmer: 



Company: 



Address: 



City: 



State: 



Intel Corporation, 1976 



98-034D 



insite 



PROGRAM CERTIFICATION 
AND REVIEW FORM 



Please check all statements made by the submitting author before noting program discrepancies. Any com- 
ments relating to program improvement are welcome; however, program revisions or rewrites must be sent 
in as original submissions. 



PROGRAM NAME: 



Does the program work? 

Were the author's comments 
accurate? 



Yes □ No D 



Yes □ No D 
Was the documentation sufficient? Yes □ No D 



REFERENCE NUMBER: 



Was modification necessary? 

Were usage instructions 
adequate? 

Should the program be revised? 



Yes □ No n 

Yes □ No D 
Yes □ No D 



COMMENTS: (Please elaborate on deficiencies noted above and include any necessary modifications) 



REVIEWED BY: 



(Use additional sheets if necessary) 



COMPANY: 



Intel Corporation. 1976 



insite 



PROGRAM CERTIFICATION 
AND REVIEW FORM 



Please check all statements made by the submitting author before noting program discrepancies. Any com- 
ments relating to program improvement are welcome; however, program revisions or rewrites must be sent 
in as original submissions. 



PROGRAM NAME: 



Does the program work? 

Were the author's comments 
accurate? 



Yes □ No El 



Yes □ No D 
Was the documentation sufficient? Yes D No D 



REFERENCE NUMBER: 



Was modification necessary? 

Were usage instructions 
adequate? 

Should the program be revised? 



Yes □ No D 

Yes D No D 
Yes □ No D 



COMMENTS: (Please elaborate on deficiencies noted above and include any necessary modifications) 



(Use additional sheets if necessary) 



REVIEWED BY: 



COMPANY: 



© Intel Corporation, 1976 



SECTION 4 



OPERATING, TESTING AND DEBUGGING PROGRAMS 



REFERENCE 
NUMBER 



PROGRAM 



PAGE 



K 



AA1 RAM TEST PROGRAM 

AA2 8O80 RAM MEMORY TEST 

AA3 MEMORY DIAGNOSTIC PROGRAM .....' 

AA4 PUNCH TEST OR TTY READER/PUNCH TE'^T 

AA5 READER TEST 

AA6 DIAGNOSTIC 1002 - MEMORY VALIDITY CHEC 

AA7 LIST DEVICE PROGRAM 

AA8 TRACE - PROGRAM TRACE AND DEBUGGER 

AA9 MEMORY TEST FOR THE 8O80. 

AA10 RAM CHECK .... 

AA11 MEMORY TEST PROGRAM ..'!"'"'"' 

AA12 8080 CPU EXERCISE ROUTINE 

AA13 INTELLEC/MDS DIAGNOSTIC TEST VERSION 1 

AA14 TTY DIAGNOSTIC 

AA15 SAMPLE AUTOMATIC TEST EQUIPMENT 

AA16 DISKETTE RECOVERY PROGRAM, RECOVERY 1 

AA17 b-BU 80/10 8255 TEST 

AA18 USCOPE 820 TEST INSTRUMENT^ 

I SBC 80/10 DIAGNOSTIC PROGRAM 

AA13 I/O TEST PROGRAM FOR SBC 80/20 - IOTEST 

AA20 INPUT/OUTPUT DIAGNOSTIC 8080 



4- 
4- 
4- 
4- 
4- 
4- 
4- 
4- 



4- 



4- 
4- 

4- 
4- 
4- 
4- 
4- 
4- 



■5 
•81 
•83 
•98 
103 
186 
190 
203 
50 
-269 
-271 
-340 
•360 
•414 
•456 
•486 
537 



545 
549 



4 
4 
4-596 



8/79 



flBl 
flB2 
RB3 
RB4 
RB5 
RB6 

RB7 

RB8 

AB9 

AB10 

flBll 

RB12 

ABO 

RB14 

AB15 

RB16 

RB17 

RB18 

RB19 

RB28 

RB21 

RB22 

AB22 

RB24 

RB25 

RB26 

RB27 

RB28 

R629 

RB38 

RB31 

RB32 

R633 

RB34 

RB36 

RB37 

RB38 

RB39 

RB40 

RB41 

RB42 

RB43 

RB44 

RB45 

RB46 

RB48 

RB49 

RB58 



TTV BINRRV LORD ROUTINE 4-7 _ 

TTV BINRRV DUMP ROUTINE 4_i ^ 

MEMORY DUMP 4 ~H 

PROM PROGRRMMER FOR INTELLEC 8 4- f-j 

TRPE DUPLICATOR 4 ~ se> 

CRCGEN - CYCLIC REDUNDANCE CHECK 

FOR DRTfi STRING OF 2*16 BYTES 4 " 4w 

16-BIT CRC FOR POLYNOMIRL X16+X12+X5+1 4 ~ 44 

CRC16 - CYCLIC REDUNDANCY CHECK 4 - 4l=! 

CRECH - CYCLIC REDUNDANCY CHECK 4 ~ 5 ^ 

LEGIBLE PAPER TAPE 4 ~J'_ 

BANNER PRINT AND PUNCH 4 $9 

TAPE LABELER FOR MDS 4 ~^^ 

PAGE LISTING PROGRAM 4 " fc " 

SOURCE PAPER TAPE TO MAGNETIC CASSETTE . 4 ~^ 

I -COMMAND - INSERT DATA IN HEX FORM FROM TTY INTO RAM . 4-76 

COMPARE OBJECT CODE TAPE WITH MEMORY 4-85 

K. PROGRAM TRAP AND DUMP ROUTINE 4 "9 t1 

DEBUG I"?-* 

TERMINAL EDITOR 4-1^4 

8068 DISASSEMBLER 4-1^-4 

8080 DISASSEMBLER 4 "Jf- 

DISASM - 8080 DISASSEMBLER 4-l^W 

BINLB - 8088 SYSTEM LOADER 4-148 

BOOT - BOOTSTRAP LOADING AND PROGRAM PATCHING 4-146 

OCTAL PROM PROGRAMMING ..... 4-152 

8080 IDLE RNRLYZER FOR APPROXIMATING CPU UTILIZATION. 4-15fo 

REAL-TIME EXECUTIVE 4-162 

PROPORTIONAL POWER CONTROL IMAGE BUILDER 4-166 

FLAG PROCESSING ROUTINE 4 ~ ± Z ± 

SYMBOL TABLE LIST ROUTINE 4-lal 

PUNCH BINARY TAPE 4-194 

MEMORY COMPARE l~'i'ff 

CYCLIC REDUNDANCY CHARACTER GENERATOR 4-^11 

COMPARE 4 Z±7 

INPUT/OUTPUT COMMANDS FOR MDS 4-223 

MLOAD - BINARY LOADER FOR MDS 4-i^B 

HEX TAPE LOADER FOR SDK 4-2^4 

HEX FORMAT PAPER TAPE DUMP FOR SDK 4-2^8 

PAPER TAPE REFORMATTER FOR SDK 4-^:4^ 

I/O PROM TAPE PROCESSOR 4-^46 

SYMBOL TABLE DUMP FOR INTELLEC 8/MOD 80 4-256 

M0N256 - 256-BVTE PROM MONITOR 4-26* 

CHARACTER INTERPRETED MEMORY DUMP 4-26^ 

ASCII DISPLAY 4_2b ,I 

BASIC CPU STATE VECTOR MAINTENANCE 4-kV_< 

DISASSEMBLER 4-^yy 

ERLIST 4 ™ 

EXRMIN * ** s 



8/79 



AB51 

AB52 

AB53 

AB54 

AB55 

FIB56 

AB57 

AB58 

RB59 

AB60 

RB61 

A662 

AB63 

RB64 

AB65 

RB66 

AB67 

AB68 

AB69 

RB7Q 

RB72 

AB73 

RB75 

RB76 

RB77 

RB78 

AB79 

RB86 

RB81 

RB82 

AB83 

RB84 

RB85 

RB86 

RB87 

RB88 

RB89 

RB9Q 

RB91 

RB93 

RB94 

RB95 

RB96 

RB98 

RB99 

RB100 

RB102 

A6103 

RB104 



LINES ON 



ICE-80 DISASSEMBLER 

DELETE COMMENTS . . 

TVPE 

SDK 80 KEVBORRD MONITOR ....'!.'"' 
DIbK DUMP ROUTINE FOR I COM F DOS -I I /MOD 
LI ST/PR I NT/TYPE "LIST SRC" ON DISKETTE 

STATEMENT COUNTER 

9600 INITIALIZE CRT 9600 URRT FOP BRI ID 
RTM CREAL TIME MONITOR) .... 

FORMAT INTEL DATA 

LIST - LIST ERRORS OR SPECIFIED 
BTP < BINARY TAPE PROGRAM) . 
LERR - LIST ASSEMBLY ERRORS . 
ADCCP REMAINDER ROUTINE . 

WIPE - FILE DELETER 

TABS - EXPANDS FILES TO INCLUDE 

INTELLEC 8 TEXT EDITOR 

2708 PROM PROGRAMMER FOR INTELLEC 8 MODS© 

INTELLEC 8 MOD80 MONITOR. . 

INTELLEC MDS MONITOR VERSION 2 R 

UTILITY MACROS FOR 8080 

SBC 80/10 PORT I/O EXERCISOR 

FLY READER DRIVER 

NON-ENCODED KEYBOARD SUBROUTINE 
LOAD 



CONTROL 



NES 



DRIVER FOR TEKTRONIX 4010 GRAF I C SCREEN 
T. I. SILENT 700-SBC 80 MONITOR INTERFACE 

GLANCE 

KEYBOARD SCANNER '.'.'.'.'' 

P2708 PROM PROGRAMMING ROUTINE. . . . . 
DATA GENERAL TO INTELLEC MDS DISKETTE TPAN 
MAIN ROUTINE DDUMP < DISKETTE DUMP Rill IT I 
I/O ROUTINE FOR T. I. SILENT 700 TERMINAL 
RECOVR - TEXT EDITOR RECOVERY PROGRAM 

MSAVE/MLOAD 

DISPLAY '.'.'. 

HAZELTINE 2000 CRT FUNCTION 

INTEL FORMAT HEX DATA FILE LOAD/READ 

"DATCON Bl" ANALOG TO DIGITAL CONVERSI 

FAST AND SLOW 

5 LEVEL CBARDOT) TO 8 LEVEL <R^CII> 

PAPER TAPE CONVERSION 

SBC COMMUNICATOR 

IBM SELECTRIC INPUT PROGRAM . 
INSERT TAB CHARACTERS FOR SPACES 
SDK PROM PROGRAMMER . . 

EXEC ] 

MDS BACK TO BACK DATA TRANSFER ^PL/M> 

FDUMP 

ENHANCED MDS TEXT EDITOR Xlll .'.'.'. 



)N 



80 



C 



ON 



FLOPPY 



OLE 



ORT 



PROGRAM 



>US 



PAC 



'AGE 



374 



4-295 

4-297 

4-301 

4-302 

4-303 

4-307 

4-325 

4-327 

4-334 

4-336 

4-338 

4-344 

4-346 

4-353 

4-356 

4-358 

4-362 

4-364 

4-366 

4-368 

4-370 

4-372 

4- 

4- 

4-380 

4-386 

4-388 

4-390 

4-392 

4-400 

4-404 

4-406 

4-412 

4-418 

4-422 

4-424 

4-426 

4-432 

4-436 

4-438 

4-450 
4-458 
4-460 
4-462 
4-464 
4-470 
4-474 
4-480 
4-482 
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RB106 
AB107 
AB108 
A6109 
flBllQ 
AB111 
AB112 

AB113 
AB114 
AB115 
AB116 
AB117 
RB11S 

AB119 
AB120 
AB121 

AB123 
AB124 

AB125 
AB126 

AB127 
A6128A 

AB128B 



AB129 

AB130 
AB131 
AB132 
AB133 

AB134 
AB135 
AB136 
AB137 
AB138 
AB139 
RB140 
AB141 
AB142 
AB143 
RB144 
AB145 



>55 TIMES 
PAGE . . 



ION 



LE 



PRINT - LIST FILE ON LP UP TO 
TYPE - LIST FILE ON CONSOLE BV 

JOIN - MERGE 2 HEX FILEb 

PRINT PROGRAM FOR Q. E. TERMINET-1200 PRINTER. 

PRINT OUT SOURCE FILE ON FLOPPV DISK. 

ONLINE, UPLOAD, DOWNLOAD 

8048 - SEVEN SEGMENT DISPLAY INTERFACE 

SUBROUTINES — SCAN • • • ■ 

AP29 "USING THE 8085 SERIAL I/O LINEb". . . • 

8048 TUNE GENERATOR 

CARD READER DRIVER, HOLLERITH TO ASCII CONVERS 

COMPARE FILES 

CUT AND PASTE EDITOR <PL/M> 

HEWLETT-PACKARD CALCULATOR TO MDS80O/' 

I/O CONTROL — HP 10 

CONTROLLER FOR HEWLETT-PACKARD 9871A PRINTER. 

PRINT TEXT FOR SBC 80/10 

MONITOR FOR ISBC80/05 OR 80/04 

MONITOR FOR ISBC80/10 OR 80/10 A 

MONITOR FOR ISBC80/20 OR 80/20-4 

EXTRACT SELECTED LINES FROM SOURCE OP. PRINT FI 

EXTRCT 

BINARY PUNCH TAPE FOR PROM PROGRAMMER - PUNCH 
HEX-FILE FORMAT TO OBJ. - 

FILE FORMAT WITH SYMBOL TABLE - HEXbVM . 
MDS TEXT EDITOR RECOVERY PROGRAM - RETRIEVE 
EID - CALIBRATION FOR MAPPING WITH THE SURFACE 

OF A CRT - EIDCAL-IN C2-PART PROGRAM >. .._... 
TRANSFORMATION ROUTINE FOR COORDINATE DIGIT'-. 
FROM EID INTO X-V COORDINATES OF CRT - 

EID-f":ALMA C2-PART PROGRAM!:' 

CALCULATE TWO VERIFICATION DIGITS FOR DATA STRING 

CHECKSUM 

FORMFD: FORMFEED TO LINEFEED, CONVERSION PROGRAM 
MONITOR ROUTINES FOP. A 3M DCD1 CAbbETTE TAPE DRI 
ALPHA: AN ALPHABETIZED LISTING OF THE DISK. DIREC 
BLOCK: LARGE HEX FILE INTO PROM LENGTH 

BLOCKS CONVERTER 

PROM BUS MAPPER 

NAME LIST MANAGER. 

FRONT PAGE IDENTIFIER PRINTER PROGRAM 
MONITOR FOR ISBC80/30. 
UP I -41 8-DIGIT LED DISPLAY CONTROLLER 
UPI-41A SENSOR MATRIX CONTROLLER. . . 
LRC PRINTER CONTROLLER - AP27 .... 
UP I- 41R COMBINATION I/O DEVICE CUNIOD 

v'l. 



VE. 
TORY 



FLEXIBLE 
I DENT 1 - 
M0N820 - 



SDK-86 SERIAL MONITOR, VI. 1 
SDK-86 KEYPAD MONITOR, VI. 1 
TAPE - AUDIO TAPE INTERFACE 
TEXT PROCESSOR 



4-488 
4-490 
4-492 
4-494 
4-496 
4-502 

4-520 

4 — 5dti. 
4-524 
4-533 
4-535 
4-554 

4-563 
4-569 
4-580 
4-590 
4-592 
4-594 

4-600 
4-608 

4-611 
4-617 

4-622 



4-624 

4-626 
4-642 
4-650 
4-653 

4-662 
4-669 
4-671 
4-678 
4-679 
4-680 
4-688 
4-698 
4-700 
4-702 
4-704 
4-706 
4-708 



FH3146 TEXT EDITOR 



'19 



AB147 8278 KEYBOARD/DISPLAY CONTROLLER - UPI-41R 

AB148 8295 DOT MATRIX PRINTER CONTROLLER - UPP-41A 

AB149 OLIVETTI 20-COLUMN PRINTER CONTROLLER - I IP I -41 

RB150 8292 <QPIB CONTROLLER!) IMPLEMENTATION 

RB151 SEND 48 DOWNLGRD TO PR0MPT48 FOP SERIES II 

R6152 PR0MPT48 OR PR0MPT89 INTERFACE - OUT IN 

AB15jS REM0TE48 - INTERACTIVE CONTROLLR OF PROMPTER 

RB154 SYMBOL TABLE INSERTER FOR AB22. 

AB155 bDK-80 PSEUDO DISASSEMBLER. 

AB156 SELECTIVE FILE LINE PRINTER AND SCANNER '.'.'.' 

AB157 SDK85 - MONITOR FOR THE 8088 SYSTEM DESIGN KIT 

RB158 RATE - BAUD RATE SELECTION FOR MDS SYSTEM 

AB159 KEYWORD FILE SEARCH FOR ISIS- 1 1 ENVIRONMENT 

AB166 TIMER - MEASURES EXECUTION TIMES OF USER PROGRAM 

RB161 KRPIRR - VERSION 1. 2 - GENERAL PURPOSE MACPfipPQC 

AB162 ECCO PAPER TAPE READER. . . 

RB163 TRACE. ICE 

RB164 DQWN88 - DOWNLOAD FROM SERIES-IITO PRriMPT80/S5 

AB165 IBM B I -SYNC CRC1S GENERATION SUBROUTINE 

RB166 HXEDIT - HEXRDECIMRL DISK FILE EDITOR 

AB167 ALPHANUMERIC INPUT FROM NUMERIC KEYBOARD 

AB168 MODIFIED SDK-88 RESTART ROUTINE 

AB169 MDS SERIES-II: DUMB TERMINAL 

RB179 FILE GENERATOR: FROM OFF-LINE TERMINAL TO 

ISIS-II FILE 



E£ 



SOR 



4-711 
4-713 
4-715 
4-717 
4-719 
4-721 

4-725 
4-727 
4-729 
4-731 
4-737 
4-739 
4-741 
4-743 
4-745 
4-747 
4-749 
4-751 
4-753 
4-755 
4-759 
4-761 

4-763 
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flCl 
RC2 
AC2 
AC4 
AC5 

AC6 
RCF 

ACS 
AC9 

flcie 

AC11 
AC12 

AC14 
AC15 

flcie 

AC18 
AC19 
AC20 
AC21 
RC22 



8880 I/O SVSTEM STRTUS DISPLRV 4- 

LIST 1 - HIGH-SPEED LIST PROGRAM FOR INTELLEC 3 .... 4- 

I/O SIMULATION MACROS 4 " 

TALLV R205O HSPTR DRIVER 4 ' 

TALLV - USE TALLV 220 LINE PRINTER IN RSSEMBLV 

STRGE OF PROGRAMMING 4 " 

MODEL 101 CENTRONICS PRINTER HANDLER 4- 

HIGH-SPEED PAPER TAPE READER WITH STEPPE* 

MOTOR CONTROL 4 " 

INTELLEC 8/MOD 80 - SILENT 700 INTERFACE._ 4- 

RE AD/WRITE ROUTINES FOR INTERCHANGE TAPEi> 4- 

HANDLER FOR TALLV PTP 4- 

T I SILENT 700 INTERFACE - INTELLEC MDS 4- 

ASSEMBLER ORIENTED CENTRONICS 206 LINE PRINTER 

HANDLER AND ERROR ONLV ASSEMBLER 4- 

MP8208 ft/O CONVERTER ROUTINE .... 4- 

PAGE BREAK FOR TEKTRONIX 4010 MODO GRAPHICS TERMINAL. . 4 

CRTBZ/GET - INTERFACE WITH HP2640 CRT TERMINAL 4 

INTERFACING THE MDS AND HP 2644 A 4 

VIDEO DRIVER 4 

BASIC DIGITAL PANEL METER CALL. .... 4 

APL GRAPHIC DISPLAV ON A 5 X 7 DOT MATRIX 4 

BUFFERED LINE PRINTER DRIVER FOR 

CENTRONIX 101A - *BLPT 4 



^5 
20 
24 
108 

112 
114 

•119 
128 
•164 
■208 
•215 

-248 
-277 
-288 
-285 
-288 
-209 
-212 
-217 

-218 
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RD1 
AD2 

flD3 
AD4 
ADS 
AD6 
AD7 



FIE1 

AE2 

AE3 

AE4 

flE5 

flE6 

RES 

AE9 

AE10 

RE11 

RE12 

AE13 

RE14 

AE15 

RE16 

RE17 
RE1S 
AE19 



SAVE/RESTORE CPU STATE ON RN INTERRUPT 4-1 
RERD RND INTERRUPT MODIFICATIONS FOR 

INTELLEC 8/MQD80 4 _27 

INTERRUPT SERVICE ROUTINE .... 4-1^:0 

INTERRUPT HRNDLER < RE-ENTRANT!) ' 4-i = <2 

SOFTWARE STRCK ROUTINES FOR 8608. . . . 4-176 

8089 — BRERK. 89 ' 4-757 

PROGRAMMABLE SOFTWARE TIMERS ....'. 4-765 

LIST. 4 _ 21S , 

TRACE ROUTINE 4-320 

8080 SVMBOL TABLE DUMP .... ^__^ 

SNAP DUMP 8080 ... - 

TRACE VERSION 7. © '.'.'.'.'.'.'. 4-351 

SCl=lN 4-384 

CROSS REFERENCE FOR PASS© PASCAL PROGRAMS— XREF80 4-408 

SBC 80/10 INTERACTIVE MONITOR . . 4-410 

SDK 80 TRAP ' 4_ 466 

TRACE .fc REGISTER PRINT OUT ........ 4-468 

bTEP 4-506 

PROGRAM TEST LOAD 4-513 

SVMBOL TABLE PROGRAM FOR 8080/808!=i VI 2 •••■■• 4 _^ ± ^ 

WRITEP - OUTPUT PROCEDURES FOR PL/M-80 4-635 

ERRORP/MESSGP - ERROR MESSAGE POINT 

SUBROUTINE CISIS-II AND USER> 4-639 

CERROR - PLM-80 COMPILER ERROR DISPLAV PROGRAM 4-673 

DKDUMP - ISIS DISK FILE DUMP. . . . 4-7^3 

DDUMP - DISKETTE DDUMP 4-735 
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intel 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AD1 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 a 8008 D 8080 □ 3000 



Program 
Title 

Function 



(use additional sheets if necessary) 



SAVE/RESTORE CPU STATES ON AN INTERRUPT 

Saves the CPU registers and flags in memory at the start 
of interrupt processing and restores the CPU registers 
and flags after the interrupt has been processed. 



A LIFO register (hardware external push down stack) to 
allow saving registers and flags without using L and H. 

In the present program, SVAD (saveguard address) is the 
output address of that LIFO register and RSAD (restitution 
address) is the input. 

None 



None 



None 



Registers Modified: 
C 



RAM Required: 
6 



ROM Required: 
60 10 bvtes 



Maximum Subroutine Nesting Level: 





Assembler/Compiler Used: 
MAC 8 



Programmer: 
Robert Arouete 



Company: 



A 2 M 



Address: 



78 170 La Celle 
St. Cloud, FRANCE 



«-034C 

4-1 



lb lb £088 MACRO ASSEMBLER, VI. 8 



PAGE 1 



.: REF. NO. AD1 

i PROGRAM TITLE SAVE/RESTORE CPU STATE ON INTERRUPT 



wioy 


■~\.' • 


ORG 


190H 


0186 


D218 


OUT 


SVAD 


0102 


78 


MOV 


A, B 


0102 


D218 


OUT 


SVAD 


8105 


79 


MOV 


A, C 


0106 


D218 


OUT 


SVAD 


0108 


7A 


MOV 


A, D 


0189 


D218 


OUT 


SVAD 


810E 


7B 


MOV 


A, E 


010C 


D218 


OUT 


SVAD 


810E 


7C 


MOV 


A, H 


010F 


D218 


OUT 


SVAD 


8111 


7D 


MOV 


A, L 


0112 


D218 

SVF : 


OUT 


SVAD 


•~ 'A 


2E08 


MVI 


A, 


■-—Jut' 


•17 


MOV 


B, A 


8117 


CA2901 


JZ •: 


;n 


811A 


2E88 


MVI 


A, 8 


011C 


F22581 


JP < 


521 


811F 


06-10 


MVI 


B, 64 


0121 


EA2901 


JPE 


SI I 


0124 


04 

S2I : 


INR 


B 


8125 


E22901 


JPO 


SI I 


iTi^_ ■;■•-; 


04 

S1I : 


INR 


B 


0129 


IF 


RAR 




012A 


BO 


ORA 


B 


012B 


D210 


OUT 


SVAD 


012D 


C9 


RET 




0018 


SVAD 
RSP : 


EQU 


16 


812E 


AF 


XRfl 


A 


812F 


DB04 


IN RSAD 


0121 


17 


RRL 




0122 


47 


MOV 


B, A 


0122 


0.4 


INR 


B 


0124 


05 


OCR 


B 


8125 


DB84 


IN F 


JSAD 


8127 


6F 


MOV 


L, A 



DECODE Z FLAG 
DECODE S FLAG 
DECODE P FLAG WHEN S IS FALSE 

DECODE P FLAG WHEN S IS TRUE 



DECODE CARRV FLAG 

GROUP ALL FLAGS IN ONE WORD 

SAVE FLAGS 



i RESTORE CARRV FLAG 



} RESTORE OTHER FLAGS 

; RESTORE REGISTERS AND ACCUMULATOR 



4-3 



ISIS S080 MACRO ASSEMBLER.. VI. 9 



PAGE 



ijxI'S DB0-1 
012H €■? 
012B DBO-1 
Q12D 5F 
m±2£ DBS 4 

01'10 OF 

0141 DBO'1 
01-12 AF 
61-1 •! DP 04 
0146 47 
01-17 DB04 
0149 C9 
O00'1 
■ : i c ; n T i * T1 



RSflD 



IN RSflD 
MOV H, fl 
IN RSflD 
MOV E, Fl 
IN RSflD 
MOV D, fl 
IN RSflD 
MOV C, fl 
IN RSflD 
MOV B, fl 
IN RSflD 
RET 
EQU 4 
END 



4-4 



inleL 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



R»f. No. 



AA1 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 8008 □ 8080 



(us* additional sheets if necessary) 



RAM TEST PROGRAM 

Performs write and read of all zeros and ones, checkerboard test and unique 
address test. The RAM to be tested is successively initialized to a value and 
then tested. The values are zero, all ones, alternate bit word (0252) and its 
complement (0125). Next, increasing consecutive values are stored and then 
tested. 



Teletypewritter 



Requires teletypewritter I/O subroutines. (Other subroutines included. ) 



After an "A" is printed, the operator types the initial and final RAM addresses 
separated by a comma and ended with a carriage return. All numbers are in 
octal. 



For each error found, the address, contents and the value which should have 
been read are printed with the heading. No errors are signified bv printing 
**A" for the next test. 



Registers Modified: 
All 



RAM Required: 
20 bytes 



ROM Required: 
429 bytes 



Maximum Subroutine Nesting Level: 
4 or 5 



Assembler/Compiler Used: 



MAC 8 



osramroer. ^ Kung / D Wallace/L Brer 
Varian Instrument Division 



Company: 2 700 Mitchell Drive 
Walnut Creek, Calif. 



den 



T-5 



intel 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB1 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 S 8008 □ 8080 D 3000 



"•e a-'W'tior-ii «!?ets if necessary) 



TTY Binary Load Routine 

H 1 i 1 i^ Pr0 ? r oc C Will 1 10ad memor y via T TY which are formatted intl 
blocks of 256 or less binary bytes and tests each block against 
a checksum frame for any read errors. The tape format requiras 
a rubout to indicate start of block followed by the starting 
page address, the starting byte address, the word count, up tD 
256 bytes of data and a checksum in that order. A block of 

2^,^ £7 er i a P P ! ges but ma y not exceed 25 6 bytes in length. 
The last block of data should be followed by two consecutive 

to^ge So^SSo? 1 * ° f ^ ^ ^^ WiU ^ tean * 

REQUIRED HARDWARE: ASR-33 teletype, teletype interface to 

8008 



Intel MCS-8 hardware assembler page 000 or TTY input and 
output routines 



None 



Program will be loaded into allocated memory locations. 
A checksum error will cause a program halt. Interrupting 
with a No-Op will restart the program. 



Registers Modified: 

A f B,C,D,E,H f L 



RAM Required: 

73 bytes 



ROM Required: ~ 

MCS-8 hardware assembler r 



Assembler/Compiler Used: 
MAC 8 



Programmer: 

David Crellen 



Maximum Subroutine Nesting Level 
2 



pp. 000 



Company: 

Continental Design 



Address: 



7723 Convoy Court 
San Diego, Ca. 92111 



98-034C 
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DESCRIPTION OF TEST DATA, DEFINITION OF TERMS, ADDITIONAL 
INFORMATION FOR THE TTY BINARY LOADER AND TTY BINARY 
DUMP ROUTINES. 

It is recommended that the TTY Binary Dump routine be assembled first. 
A known section of memory, preferably ROM should be dumped using the 
Binary dump routine. By manually checking the first few bytes with an 
octal dump of the same area the user can determine whether or not he's 
on the right track. 

The complete program checkout procedure would be as follows: 

Load a page of octal data using the octal loader. 
Dump the page in binary. 
Load the page back in using the binary loader. 
Dump the page using the octal dump program. 

The tape produced by the octal loader in the final step should compare 
exactly with the tape loaded in initially. 

SOME TERMS DEFINED; AND CONVENTIONS USED: 

The Checksum produced by the dump program and checked by the loader 
is a modulo-256 10 sum of all data in the block. Assuming a valid punch 
operation, a faulty checksum indicates a read error. 

The byte count is the number of bytes to be loaded into memory. At the 
expiration of the byte count, the checksum is examined. 

The dump produces, and the loader requires, an eight bit rubout preceding 
the binary address of the data. Thus, the format is: 

00000.000 rubout 

00000.000 starting address, page 

00000.000 starting address, byte 

ooooo. ooo byte count 



•byte count' frames 



ooooo. ooo 



checksum 



ooooo » ooo rubout 

ooooo. ooo rubout . . . stop code 
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.; REF. NO flBl 

i PROGRAM TITLE TTV BINARV 



LOAD ROUTINE 







; TTV 


BINflRV 


LOAD ROU" 






BEGIN 






0000 


CD3500 




CALL 


READ.: 


0003 


FEFF 




CPI 


377Q; 


0005 


C20000 




JNZ 


BEGIN.: 


0008 


CD3500 




CALL 


READ 


000B 


FEFF 




CPI 


377Q; 


000D 


CA47O0 




■JZ 


DONE 


0010 


67 




MOV 


H, A; 


0011 


CD3500 




CALL 


READ 


0014 


6F 




MOV 


L, A; 


0015 


CD3500 




CALL 


READ 


0018 


5F 




MOV 


E, A.; 


0019 


1600 


LOAD : 


MVI 


D.- 000.: 


KI01B 


CD3500 




CALL 


READ 


001E 


77 




MOV 


M, A.: 


001F 


82 




ADD 


D.: 


0020 


57 




MOV 


D.. A; 


0021 


2C 




INR 


L.: 


0022 


C22600 




■JNZ 


SKIP.: 


0025 


24 


SKIP: 


INR 


H 


0026 


ID 




DCR 


E.: 


0027 


C21B00 




JNZ 


LOAD.; 


002A 


CD3500 




CALL 


READ; 


002D 


92 




SUB 


D; 



002E CAy000 



0031 76 



0032 C30W00 

0035 45 

0036 4C 

0037 2148O0 
003A 70 
"'<i3B 2C 

J3C 71 
063D 2C 
003E 72 



STOP 



READ 



JZ BEGIN; 
HLT.: 000 



JMP 



BEGIN 



MOV 


B, L.: 


MOV 


C, H 


LXI 


H, SAVER 


MOV 


M, B 


INR 


L 


MOV 


M, C 


INR 


L 


MOV 


M, D 



READ A FRAME 
START OF BLOCK? 
NO. 

2 RUBOUTS = STOP CODE 

LOAD STARTING ADDRESS PAGE 

LOAD STARTING ADDRESS BVTE 

LOAD BVTE COUNT 
INITIALIZE CHECKSUM 



STORE BVTE 
ADD TO CHECKSUM 
UPDATE CHECKSUM 
NEXT BVTE 
NO PAGE LAP 



DECREMENT BVTE COUNT 
LOOP UNTIL BVTE COUNT = 
READ CHECKSUM FROM TAPE 
COMPARE CALCULATED CHECKSUM TO 
READ CHECKSUM 
READ NEXT BLOCK 

CHECKSUM 

ERROR STOP. PROGRAM CAN BE RESTA 

WITH A "NOP" INTERRUPT. 



SAVE REGISTERS 
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003F 


AF 






XRA 


A; 


0040 


CF 






RST 


TV I MP 


0041 


56 






MOV 


D, M; 


0042 


2D 






DOR 


U 


0043 


4E 






MOV 


C, M 


0044 


2D 






DCR 


L 


0045 


6E 






MOV 


L, M 


0046 


61 






MOV 


H.. C 






DONE : 






0047 


C9 


5ft'- 


/ER : 


RET 




0048 








DS 3 




0001 




TV INF 


EQU 1 




0000 








END 





ACC=0; FLAGS SET 
DATA INPUT FROM TTV 
NOT SEND TO PRINTER 
RESTORE REGISTERS 
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falsity INTEL * USERS LIBRARY SUBMITTAL FORM 



Ref.# AB2 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 #8008 D8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



TTY BINARY DUMP ROUTINE 



This program will punch the contents of memory via TTY which are 

IZTlltt ! n H° bl ° Ck ? ° f 256 or less binary bytes with checksum. The 
tape format begins with a rubout to indicate start of block followed by 
In 9^ 3 K I" 9 P ^ 9 ! ! ddress ' +he starting byte address, the word count, up 
to 256 bytes of data and a checksum in that order. The start and end 
memory locations are entered from the TTY keyboard. 

ASR-33 teletype, teletype interface to 8008 



an^TTY^"? I*?"?™ assemb 'er page 000 or TTY input and output routines 
ana my octal to binary converting routine (BILDE). 

On TTY keyboard enter D followed by colon then endinq paqe (PPP) 
ending byte (BBB), starting page (ppp), starting byte (bbb). 



D: PPP: BBB: ppp: bbb: 



Program will punch binary tape from designated memory locations and 

mI C l V" d £ UnCh a checksum - Ta P e f eed frames are punched between 
d locks and a stop code (two consecutive rubouts) are punched at end of 
dump. The program wi I I end by branching to page 000 byte 000 



Registers Modified: 
A, B, C, D, E, H, L 



RAM Required: 



ROM Required: ~ 

MCS-8 Hardware assembler pg. QOQ 

Maximum Subroutine Nestinq Level: 
3 



Assembler/Compiler Used: 
MAC8 



Programmer: 
David Crel I en 



Company: 
Continental Design 



Address: 
7723 Convoy St. 



City: 
San Diego 



State: 

CA 



92111 



© Intel Corporation, 1976 



98-0340 
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i REF. NO. AB2 

J PROGRAM TITLE TTV BINARV DUMP 



0000 


AF 


0001 


FF 


0002 


F680 


0004 


FEC4 


0006 


C20000 


0009 


AF 


000A 


FF 


000B 


F680 


000D 


FEBA 


000F 


C20O00 


0012 


218E00 


0015 


CD9F00 


318 


73 


0019 


2C 


001A 


CD9F00 


001D 


73 


001E 


CD9F00 


0021 


63 


0022 


CD9F00 


0025 


6B 


0626 


CD6A00 


0029 


CD 7600 


002C 


7C 



002D F7 
002E 7D 
002F F7 

0030 AF 

0031 93 

0032 F7 

0033 1E00 

0035 7E 

336 83 

*037 5F 

0038 7E 



BEGIN: 



PADR : 



PTEXT : 



i TTV BINARV DUMP ROUTINE 



XRA 


A 


RST 


TTVIN; 


OR I 


2O0Q; 


CPI 


304Q; 


JNZ 


BEGIN; 


XRA 


A 


RST 


TTVIN 


OR I 


200Q 


CPI 


272Q; 


JNZ 


BEGIN; 


LXI 


H, ENDER; 


CALL 


BILDE; 


MOV 


M.E.: 


INR 


L; 


CALL 


BILDE.; 


MOV 


M,E; 


CALL 


BILDE; 


MOV 


H, E; 


CALL 


BILDE.; 


MOV 


L, E; 


CALL 


FEED.; 


CALL 


BVTEC; 


MOV 


A, H.; 



RST 


TTVOT; 


MOV 


n.* L..F 


RST 


TTVOT.; 


XRA 


A.; 


SUB 


E 


RST 


TTVOT; 


MVI 


E, 000j 


MOV 


A, M; 


ADD 


E.; 


MOV 


E, A; 


MOV 


A,M; 



INPUT TTV-SEND TO PRINTER 

ADD PAR I TV 

D? 

NO. 



COLON? 

NO. 

POINT TO ENDING VALUE 

ACCEPT 3-DIGIT OCTAL FROM TTV 

CONVERT TO BINARV REPRESENTATION 

STORE ENDING PAGE 

POINT TO BVTE END VALUE 

ACCEPT OCTAL FROM TTV 

STORE ENDING BVTE 

ACCEPT OCTAL FROM TTV 

STORE START PAGE 

ACCEPT OCTAL FROM TTV 

STORE START BVTE 

GENERATE LEADER FOR PUNCH 
CALCULATE FIRST-BLOCK BVTE COUNT 
MOVE PAGE ADDRESS TO ACC FOR 
BINARV PUNCH. NOTE THAT THE 
REQUIRED LEADING RUBOUT HAS BEEN 
PUNCHED BV THE FEED ROUTINE PRE- 
CEEDING EACH BLOCK- 
PUNCH START IN ADDRESS 
MOVE BVTE ADDRESS TO ACC 
PUNCH STARTING ADDRESS — BVTE 
COMPUTE BVTE COUNT 

BVTE COUNT IN ACC— -PUNCH ONTO TA 
INITIALIZE CHECKSUM 

FETCH DATUM FROM MEMORV 

COMPUTE CHECKSUM 

UPDATE CHECKSUM 

CHECKSUM CALCULATION DESTROVED D 

IN ACC. IS FETCHED FROM MEMORV A 
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0039 
003A 
003B 
003C 
003F 

0040 

0043 
0044 
0045 
0046 
0047 
0048 



F7 

7C 

4D 

218E00 

BE 

C24B00 

47 

79 

2C 

BE 

78 

CR5C00 



P2 



004B 0C 
004C C25700 
004F 69 

0050 67 

0051 24 

0052 7B 

0053 F7 
354 C32600 

0057 €3 

0058 67 

0059 C33500 

005C 7B 
005D F7 
005E CD6AO0 

0061 3EFF 

0063 F7 

0064 CD6A00 

0067 C30000 



36A 1E28 

006C AF 
006D F7 



PUNCH : 

RST TTVOT.; 

MOV A, Hi 

MOV C, L; 

LXI H, ENDER; 

CMP M.i 

JNZ P2; 

MOV B, A 

MOV A, C.i 

INR U 

CMP M; 

MOV A, B 

JZ PEND.; 

INR C; 

JNZ P3 

MOV L, C; 

MOV H, f\i 

INR H 

MOV A, E 

RST TTVOT; 

JMP PRDR.: 

MOV L, C; 
MOV H, A 
JMP PTEXT 

MOV A, E; 
RST TTVOT 
CALL FEED; 

MVI A, 377Q 

RST TTVOT.; 

CALL FEED; 

JMP DONE 
THE VALUE OF DONE IS EQUATED 
000 000 IN THIS ASSEMBLY. TH 
IS THE DESIRED BRANCH AFTER 
IS COMPLETED. A VALUE OF 000 
CONTROL TO THE TTV OPERATING 
FURTHER COMMANDS MAV BE MADE 
DUMP PROGRAM IS TO BE MADE A 
SUBROUTINE, A "RET" INSTRUCT 
BE APPROPRIATE. THE PROGRAM 
BE MADE TO HALT HERE, IF DES 
FEED : 

MVI E, 040.; 



P3 



PEND : 



PUNCH DATUM 
SAVE PAGE VALUE 
SAVE BYTE VALUE 
POINT TO ENDING VALUE 

LAST FAGE? 
NO. 

MOVE BYTE ADDRESS TO ACC FOR COM 
POINT TO LAST BYTE 
LAST BYTE? 

YES — GO TO END OF JOB 

NEXT BYTE 

RESTORE H&L REGISTERS 
RESTORE H&L REGISTERb 



PUNCH CHECKSUM 

GO PUNCH NEXT BLOCK 

RESTORE H&L REGISTERS 



XRA 
RST 



A; 
TTVOT.; 



PUNCH CHECKSUM 

GENERATE TRAILER AND 1 OF 

2 NEEDED RUBOUTS FOR STOP CODE 

PUNCH RUBOUT 
MORE TRAILER 

TO 
IS ADDRESS 
THE DUMP. 

000 RETURNS 

SYSTEM SO 
IF THE 

CALLED 
ION WOULD 
COULD ALSO 
I RED. 

INTER-RECORD GAP OF 32 FRAMES 

INSURE TAPEFEED IS PUNCHED 
PUNCH TAPEFEED 
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006E 


ID 




DCR 


E; 


006F 


C26C00 




JN2 


F; 


0072 


3EFF 




MVI 


A, 377Q; 


0074 


F? 




RST 


TTVOT; 


0075 


C9 


BVTEC : 


RET 


.» 


0076 


44 




MOV 


B, H; 


0077 


4D 




MOV 


C, L; 


9078 


7C 




MOV 


A, H; 


0079 


218E00 




LXI 


H, ENDER; 


007C 


BE 




CMP 


M; 


007D 


C28600 




JNZ 


NEQ; 


0080 


2C 




INR 


L; 


0081 


7E 




MOV 


A, M; 


0082 


91 




SUB 


C; 


0083 


C38800 


NEQ : 


JMP 


SKIP 


0086 


2C 




INR 


L; 


0087 


7E 


SKIP: 


MOV 


A, M; 


0088 


EEFF 




XRI 


377Q; 


38A 


5F 




MOV 


E, A; 


008B 


60 




MOV 


H.. B; 


008C 


69 




MOV 


L.. C; 


008 D 


C9 


ENDER : 


RET 




008E 






DS 2 




0000 




DOME 


EQU 


0; 


0006 




TTVOT 


EQU 


6; 


0007 




TTVIN 


EQU 


7; 


009F 




BILDE 


EQU 


000237Q; 



REDUCE "FRAMES REMAINING" COUNT 

LOOP UNTIL DONE 

LOAD LEADING RUBOUT FOR BLOCK ST 

PUNCH START OF BLOCK 

RE-ENTER PROGRAM 

SAVE H 

SAVE L 

GET INITIAL H TO ACC 

POINT TO FINAL H 

INITIAL PAGE = FINAL PAGE? 

NO. 

POINT TO FINAL L 

GET FINAL L 

ACC=FINAL - INITIAL 



POINT TO FINAL L 
GET FINAL L 

l-'S COMPLEMENT 
STORE BVTE COUNT IN 
RESTORE H 
RESTORE L 



IS STORED HER 
ADDRESS ON PR 



0000 



END 



; THE FINAL ADDREi 
THIS IS THE BRANCH 
COMPLETION 
TTV OUTPUT ROUTINE 

TTV INPUT ROUTINE — ECHOES BACK- 
TO PRINTER. EQUATE TO 00OO10 IF 
DATA ENTRV IS PREFERRED 

ACCEPTS 3-DIGIT OCTAL TE 
COLON AND CONVERTS TO BIHARV WIT 
RESULT IN "E" 
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MICROCOMPUTER USER'S 

inteL LIBRARY submittal form Ref . No . AB3 



D 4004 D 4040 E 8008 D 8080 □ 3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



MEMORY DUMP 

Lists memory in octal: start & stop point user definable 



TTY — standard Intel setup 



TTY routines 

Carriage return & linefeed routines 



None 



Lists memory on teletype 



Registers Modified: 
All 



RAM Required: 

Last 7 words of 013 



1 RAM or ROM for pgm storage 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
MAC 8 



Programmer: 
LeRoy J. Kniskern 



Company: 
Poly-Scientific Div. 
Litton Systems y Inc. 



A fl£R N. Main St. 
Blacksburg, Va. 24060 



98-034C 

4-17 



I-..S 8080 MACRO ASSEMBLER, VI. £1 



PAGE 1 



i REF. NO. AB3 

PROGRAM TITLE MEMORV DUMP 



; DUMPb SELECTED MEMORV IN OCTAL 

; USER I NSTRUC T I ONS 

; CALL THIS SUBROUTINE 

t TTV WILL TVPE F 

; TVPE FIRST ADDRESS TO BE DUMPED 

i IN FORMAT HHH:LLL: 

> EXAMPLE ©10:356: 

; ADDRESS IN OCTAL, 3 DIGITS IMMEDIATELY 

PRECEEDING : ARE INTERPERTED AS ADDRESS 
i TTV WILL TVPE L 

i TVPE LAST ADDRESS TO BE DUMPED IN SAME FORMAT 
; ADDRESSES NEED NOT BE ON SAME PAGE 

J EXTERNAL SUBROUTINES REQUIRED- 

i TTV IN- INTEL TELETVPE INPUT ROUTINE 

■■ TOUT - INTEL TELTVPE OUTPUT ROUTINE 

CRLF -CARRIAGE RET & LINE FEED ROUTINE 

; REGISTERS USED - ALL 

i RAM USED - LOCATIONS 371 THRU 377 IN 013 



0000 


260B 


0002 


CD2300 


0005 


0646 


0007 


CDS500 


000A 


CD2800 


000D 


CDA600 


0010 


2EFC 


0012 


73 


0013 


CDA600 


0016 


2EFB 


M8 


73 


,.,01 9 


CD2S00 


001C 


064C 


001E 


CD8500 



OUTPUT FORMAT -ADDRESS LISTED EVERY 8 LOCATIONS 
CONTENTS OF M IN OCTAL 



BEGIN 



MVI 

CALL 

MVI 

CALL 

CALL 

CALL 

MVI 

MOV 

CALL 

MVI 

MOV 

CALL 

MVI 

CALL 



H, 013Q 
CRLF; 

B, ■F- 
TOUT 
CRLF 
TAKE3; 
L, 374Q 
M, E 
TAKE3; 
L, 373Q 
M, E 
CRLF 
B, •L'- 
TOUT 



CARRIAGE RETURN & LINE FEED 



GET FIRST 'H- 



LET FIRST 'L-- 
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0021 CD2800 




CALL 


CRLF 


0024 CDA600 




CALL 


TAKE3; GET LAST 'H 


0027 2EFA 




MVI 


L, 372Q 


0029 73 




MOV 


M, E 


002A CDA600 




CALL 


TAKE3J GET LAST 'L 


002D 2EF9 




MVI 


L, 371Q 


002F 73 




MOV 


M, E 


0030 2C 




INR 


L 


0031 2C 




INR 


L 


0032 46 




MOV 


B, M 


0033 2C 




INR 


L 


0934 4E 




MOV 


C, M 


0035 68 




MOV 


L, B 


0036 61 


PRT: 


MOV 


H, C 


0037 CD5800 


PRT1: 


CALL 


PRADR 


003A 5E 




MOV 


E, M 


003B CD8200 




CALL 


PROCT 


003E CD6E00 




CALL 


ADCK 


0041 CA5400 




JZ 


DONE 


344 2C 




INR 


L 


0045 C24900 




JNZ 


PRT2 


0048 24 


PRT2: 


INR 


H 


0049 7D 




MOV 


A, L 


004A E607 




AN I 


007 


004C FE00 




CPI 


000 


004E CC5800 




CZ 


PRADR 


0051 C33A00 


DONE: 


JMP 


PRT1 


0054 CD2800 




CALL 


CRLF 


0057 C9 


PRADR 


RET 


; EN 


0058 CD2800 




CALL 


CRLF 


005B 5C 




MOV 


E, H 


005C CD8200 




CALL 


PROCT 


005F 5D 




MOV 


E, L 


0060 CD8200 




CALL 


PROCT 


0063 062D 




MVI 


B, '-' 


0065 CD8500 




CALL 


TOUT 


0068 063B 




MVI 


B, '; "i i=-P 


006A CD8500 




CALL 


TOUT 


006D C9 


ADCK: 


RET 




006E 45 




MOV 


B*L 


36F 4C 




MOV 


C, H 


^070 21F916 




LXI 


H, 013371Q 


0073 7E 




MOV 


ft, M 


0074 B8 




CMP 


6 



END OF DUMP < COULD BE JUMP INSTR 
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0075 


C27F00 




JNZ 


NOT IT 






9078 


2C 




INR 


L 






0079 


7E 




MOV 


A, M 






007A 


B9 




CMP 


C 






007B 


C27F00 




JNZ 


NOT IT 






007E 


C9 


NGTIT: 


RET 








807F 


68 




MOV 


L, B 






0080 


61 




MOV 


H, C 






0081 


C9 


PROCT : 


RET 








0082 


7B 




MOV 


A, E 






0083 


E6C0 




AN I 


300Q 






0085 


07 




RLC 








0086 


07 




RLC 








0087 


CD9F00 




CALL 


OCT1 






008A 


7B 




MOV 


A, E 






008B 


E638 




AN I 


070Q 






008D 


0F 




RRC 








008E 


0F 




RRC 








008F 


OF 




RRC 








390 


CD9F00 




CALL 


OCT1 






0093 


7B 




MOV 


A, E 






0094 


E607 




AN I 


007 






0096 


CD9FO0 




CALL 


OCT1 






0099 


063B 




MVI 


B, -i ■•; 


SPACE 




009B 


CD8500 




CALL 


TOUT 






009E 


C9 


OCT1: 


RET 








009F 


C630 




AD I 


"0"; 


060 OC 


:tal 


00A1 


47 




MOV 


B, A 






00A2 


CD8500 




CALL 


TOUT 






00A5 


C9 


TAKE3 : 


RET 








00A6 


CD3900 




CALL 


TTVIN 






00A9 


78 




MOV 


A, B 






00AA 


FE3A 




CPI 


-•= . y 






00AC 


CABB00 




JZ 


IN3 






00AF 


2EFF 




MVI 


L, 377Q 






00B1 


56 




MOV 


D, M 






00B2 


70 




MOV 


M, B 






00B3 


2D 




DCR 


L 






00B4 


5E 




MOV 


E, M 






00B5 


1 hL. 




MOV 


M, D 






00B6 


2D 




DCR 


L 






00B7 


7"; 




MOV 


M, E 






DBS 


C3A600 


IN3: 


JMP 


TAKE3 






00BB 


CDCA00 




CALL 


CONOCT 






00BE 


D0 




RNC 


-• 




N( 



NO ERROR, BINARY NOW IN -E- 
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PRQE 4 



00BF 063F 




HVI 


B, •'?••' 


00C1 CD8500 




CRLL 


TOUT 


00C4 CD2S80 




CRLL 


CRLF 


00C7 C3R600 


CONOCT 


JMP 


TRKE3 


00CR 2EFF 




MV I 


L, 3770 


00CC CDF200 




CRLL 


CON1 


00CF D8 




RC 




00D0 5F 




MOV 


E, R 


00D1 2D 




DCR 


L 


00D2 CDF200 




CALL 


CON1 


00D5 D8 




RC 




00D6 07 




RLC 




80D7 07 




RLC 




00D8 07 




RLC 




00D9 83 




RDD 


E 


00DR 5F 




MOV 


E, R 


00DB 2D 




DCR 


L 


00DC CDF280 




CRLL 


CON1 


80DF D8 




RC 




00E0 47 




MOV 


B, R 


3E1 D604 




SUI 


004 


00E3 D2EE00 




JNC 


NOTOK 


00E6 78 




MOV 


R, B 


00E7 0F 




RRC 




00E8 0F 




RRC 




00E9 83 




RDD 


E 


00ER 5F 




MOV 


E, R 


00EB RF 




XRR 


R 


00EC IF 




RflR 




00ED C9 


NOTOK : 


RET 




00EE 3E01 




MVI 


fl, 001 


00F0 IF 




RRR 




00F1 C9 


CON1 : 


RET 




00F2 7E 




MOV 


R.. M 


00F3 C6C8 




RDI 


318Q 


00F5 D8 




RC 




00F6 D6F8 




SUI 


370Q 


00F8 C9 




RET 




0028 


CRLF 


EQU 


50Q.i 


0085 


TOUT 


EQU 


205Q.: 


0039 


TTVIN 


EQU 


?±Qi 


0000 




END 





CHRNQE RS REQUIRED 
CHRNQE RS REQUIRED 
CHRNQE RS REQUIRED 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM M . *.. 



AB4 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 £9 8008 Q 8080 



(use additional sheets if necessary) 



PROM PROGRAMMER FOR INTELLEC 8 

Changes programmer from fixed timing to PROM dependent 
timing. Programs 50% more than minimum required, 
ensuring permanency. 



Intellec 8 with PROM programming board and system monitor 
PROMs . 



Works with Intellec 8 system monitor version 1.0 and 1.1. 



Interfaces with user exactly as original version. 



Noticeably faster programming with no requirement for 
two (2) passes to ensure permanency. Locations that 
cannot be programmed result in return to system with 
a printout of the location. 



Registers Modified: Register D used in 

addition to others used in 
original version. 


Maximum Subroutine Nesting Level: 
N/A 


RAM Required: 

None additional 


Assembler/Compiler Used: 

Intellec 8 /Mod 8 Macro 
Assembler, Ver. 1.0 


ROM Required: 

None additional 


Programmer: _,.,,. 

William Haskett 

Northeast Electronics 




"""""^Box 649 

Concord, N.H. 03301 
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;REF, NO. AB4 

t PROGRAM PROM PROGRAMMER FOR INTELLEC 8 



3CCB 


INC AD 


SET 


3CCBH 


3BDE 


START 


SET 


2BDEH 


~' cr c* "• 


HEXAD 


SET 


3EF2H 


3C75 


LONG 


SET 


3C75H 


3C72 


SHORT 


SET 


3C72H 


2B9A 




ORG 


3B9AH 


3B9A 1668 


NEW : 


MVI 


D.. 38H 


3B9C 79 




MOV 


A, C 


2B9D EEFF 




XRI 


OFFH 


3B9F D30A 




OUT 


10 


3BA1 DB02 


OLD : 


IN 


■"* 


3BA3 EEFF 




XRI 


OFFH 


3BA5 BE 




CMP 


M 


C 'A6 CAB23B 




JZ 


DOWN 


-l5A9 14 




INR 


D 


3BAA 3E70 




MVI 


A, 70H 


3BAC BR 




CMP 


D 


3BAD CADA3B 




JZ 


ERROR 


3BB0 14 




INR 


D 


3BB1 14 




INR 


D 


2BB2 15 


DOWN : 


DCR 


D 


3BB3 CACC3B 




JZ 


DONE 


3BB6 3EFF 




MVI 


A, OFFH 


2BB8 AE 




XRA 


M 


3BB9 D30B 




OUT 


11 


3BBB 3EB7 




MVI 


A, 0B7H 


3BBD D309 




OUT 


9 


3BBF CD753C 




CALL 


LONG 


3BC2 3E37 




MVI 


A, 37H 


3BC4 D309 




OUT 


9 


3BC6 CD723C 




CALL 


SHORT 


3BC9 C3A13B 




JMP 


OLD 


3BCC 0C 


DONE : 


INR 


c 


3BCD CADE3B 




JZ 


START 


3BD0 CDCB3C 




CALL 


INCAD 


3BD3 ID 




DCR 


E 


2BD4 C29A3B 




JNZ 


NEW 


3BD7 C3DE3B 




JMP 


START 


~:BDA 79 


ERROR : 


MOV 


A, C 


,DB CDF23E 




CALL 


HEXAD 


2BDE OO 




NOP 




0030 




END 





.; MONITOR SUBROUTINES 



; SET MINIMUM OVERCHARGE 

;FET ADDRESS TO PROGRAM 

> COMPLIMENT IT 

; SEND TO PROM 

.: READ DATA IN PROM 

i COMP WITH DESIRED DATA 
■■ IF OK, GOTO OVERCHARGE 
• INCREMENT PASS COUNT 
.; GET MAXIMUM PASSES 
i COMPARE WITH COUNT 
iCAN-T PROGRAM, GIVE UP 

.; ADD TWO TO PASS COUNT 
i SUB ONE FROM COUNT 
; FINISHED IF ZERO 

:■ GET DATA TO PROGRAM 
;SEND IT TO PROM 

i ENABLE PROG PULSES 
.iWAIT THREE PULSES 

.; STOP PULSES 

■> COOL OFF 

J DO IT AGAIN 

■> bTEP NEXT PROM ADD 

.'QUIT IF OVERFLOW 

.= STEP MEMORY ADDRESS 

.; DEC COUNT OF POS TO PROG 

■> START PROG NEW LOCATION 

; RETURN TO SVSTEM 

:GET ADD WHERE FAILED 

.; PRINT IT 

.•ENDS AT START OF MONITOR 
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MICROCOMPUTER USER'S 

LIBRARY SUBMITTAL FORM *f. *, *, 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 □ 8008 Q] 8080 



(use additional sheets if necessary) 



8080 I/O SYSTEM STATUS DISPLAY 

« p ^ia™^,iS 1 ?T t i ' nformation when invoked by the intellec8 / 



INTELLEC 8/MOD 80, 1 1702A PROM 



INTELLEC 8/MOD 80 MONITOR, Version 1.0 



Calls IOCHK and uses the returned value for driving the display 



SYSTEM STATUS 

CONSOLE TTY 

READER PTR 

PUNCH PTP 

LIST TTY 



Registers Modified: 
N/A 



RAM Required: 

NONE 



ROM Required: 
1 1702A 



Maximum Subroutine Nesting Level: 

3 bytes 



Assembler/Compiler Used: 

8080 Resident Macro Assembler 



Programmer: 

K. Burgett 



Company: 
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Ref.# AD2 



insite mT ^' users library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004/4040 D8008 X*8080 D8048 D8085 □ Other. 



, (use additional sheets if necessary) 



READ AND INTERRUPT MODIFICATIONS TO THE 8080 SYSTEM MONITOR 

These modifications allow printing of headings or operator 
instruct, ons at the beginning of a Read operation (from the front 
of the Hex Load tape). They also allow console control of the 
interrupt enable F-F. This prevents interrupts until the 
service subroutines are loaded. 



Intel lee 8-80 (or equal) 
PROM Programmer 



8080 Monitor, Version 2.0 



Monitor Commands: 

ItRtl 

"IE" 
"ID" 



The Monitor Commands cause the following action: 

R Read Hex Tape and print heading (ail characters 
before the first ":") on the console. 

"IE" Enable the 8080 interrupt F-F. 

"ID" Disable the 8080 interrupt F-F. 



Registers Modified: 
Not Impo r t a n t 



RAM Required: 
None 



ROM Required: 
48H (Or 1 1702A) 



Maximum Subroutine Nesting Level: 
(Not important) 



Assembler/Compiler Used. 
8080 Macro Assembler 



Programmer: 

C. Vincent Phil lips 



Company: 

A Ikon Corporation 



Address: 
5329 N. High St. 



City: 
Columbus 



State: 

Ohio 



43214 



> Intel Corporation, 1976 



98-034D 
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3C20 
3D59 
3CAD 
3EEE 
3F6D 
386A 
3C32 



-S600 



3600 C33636 
3603 C3203C 
3606 C3203C 
36£i9 C3203C 
360C C3203C 
360F C31836 
3612 C3203C 
3615 C3203C 



:• REF. NO. AD2 

i PROGRAM TITLE READ AND INTERRUPT MODIFICATIONS 



J LINKAGES 

LER EQU 

EXPR EQU 

CRLF EQU 

RIX EQU 

TI EQU 

START EQU 

CO EQU 
THIS CHIP CONTAINS 
THE UNUSED BRANCHE 



3C20H 
3D59H 
3CADH 
3EEEH 
3F6DH 
386AH 
3C32H 

MONITOR 
IN THE COMMAND 



TABLE HAVE BEEN MOVED TO THIS HHIP 
FUTURE MODIFICAIONS. 
THE FOLLOWING MODIFICAIONS MUST BE MADE TO 
CHIP _<8O0 t COMMAND BRANCH TABLE > 



; ERROR ROUTINE 
i GET EXPRESSION 
; CARRIAGE RETURN, LINE FEED 
i READ, CHECK AND MASK PARI 
J INPUT FROM CONSOLE AND E 
.: MAIN CONTROL LOOP 
.: CONSOLE OUTPUT 
COMMAND OVERFLOW 

BRANCH 

TO EASE 



LOCATION 

SSfil- 

38A5 

38A7 

38AF 

38B3 

38B5 

38BB 

38BD 



2 203C 



OLD 

0036 

203C 

203C 

203C 

203C 

DF3A 

203C 

203C 



ORG 3600H 

NEW COMMAND BRANCH TABLE 



NEW 

0336 
0636 
0936 
0C36 
0F36 
1236 
1536 

; CHIP 3600H 



JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 



INTER 

LER 

LER 

LER 

LER 

READ 

LER 

LER 



; I 
; J 
; K 

Q 
R 
U 
V 



ENTRY 
ENTRV 
ENTRV 
ENTRV 
ENTRV 
ENTRV 
ENTRV 
ENTRV 



POINT 
POINT 
POINT 
POINT 
POINT 
POINT 
POINT 
POINT 



READ ROUTINE 
i THIS SUBROUTINE CAUSES A HEADING TO BE 
i PRINTED ON THE CONSOLE FROM THE INPUT TAPE 
; BEFORE THE BALANCE OF THE TAPE IS READ IN 
,'THE NORMAL MANNER. ALL CHARACTERS BEFORE 
i THE FIRbT : EXCEPT NULLS ARE PRINTED. THIS 
; IS USEFUL WHEN LOADING FROM MAG TAPE OR A 
J DISK. 
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3618 


0D 


3619 


CD593D 


361C 


CDAD3C 


361F 


CDAD3C 


3622 


El 


3623 


E5 


3624 


CDEE3E 


362? 


CA2236 


362A 


4F 


362B 


CD323C 


362E 


D63A 


3630 


C22236 


3633 


C3EE3A 



READ 



RA: 



DCR 


C 


CALL 


EXPR 


CALL 


CRLF 


CALL 


CRLf- 


POP 


H 


PUSH 


H 


CALL 


RIX 


JZ 


RA 


MOV 


C, A 


CALL 


CO 


SUI 


• . S 


JNZ 


RA 


JMP 


3AEEH 



; GET ONE ADDRESb 
; SPACE UP 

; GET BIAS ADDRESS 

;READ CHARACTER 
SKIP IF NULL 



TVPE ON CONSOLE 
LOOKFOR RECORD MARK 

i JUMP TO READ ROUTINE 



; INTERRUPT CONTROL ROUTINE 
IE ENABLE INTERRUPT 
ID DISABLE INTERRUPT 

THIS SUBROUTINE ALLOWS THE CONTROL OF 
THE INTERRUPT ENABLE FROM THE CONSOLE. 
THIS IS USEFUL TO PREVENT INTERRUPTS 
UNTIL THE INTERRUPT SERVICE SUBROUTINES 
ARE LOADED. 

THE FOLLOWING MODIFICAIONS MUST BE MADE 
TO THE MONITOR: 



INTER: 



3636 CD6D3F 
3639 FE45 
363B C24236 
363E FB 
363F C36A38 

3642 FE44 
3644 C2203C 

3647 F3 

3648 C36A38 

0000 



II: 



LOCATIOls 

386A 

3F9F 


1 


OLD 

FB 

FB 


NEW 

00 
00 


CALL 

CPI 

JNZ 

EI 

JMP 


TI 

"E" 

11 

START 




; INPUT CHARACTER 
i COMPARE WITH "E" 
i JUMP IF NOT "E" 
; ENABLE INTERRUPTS 
; RETURN 


CPI 
JNZ 
DI 


'0' 

LER 




; COMPARE WITH "D" 
TERROR IF NOT "D" 
; DISABLE INTERRUPTS 


JMP 


START 




i RETURN 



END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AC2 



□ 4004 [^8008 Qj|8080 Q 4040 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



L 



LIST 1 



HIGH SPEED LIST DEVICE FOR INTELLEC 8: REQUIRES NO ADDITIONAL OUTPUT 
BOARD BECAUSE THE PROM PROGRAMMER SOCKET IS USED FOR THE PRINTER 
CONNECTION. 



INTELLEC 8, ONE PROM CHIP, A HIGH SPEED PRINTER SUCH AS CENTRONICS 
306, TELETYPEWRITER 



INTELLEC MONITOR VER. 1.0 



COMMAND "AL=1" IN MONITOR WILL CAUSE EXTERNAL PRINTER (CONNECTED 
VIA PROM PROGRAMMER) TO BE USED FOR "LIST" INFORMATION; (E.G. 
ASSEMBLER PRINTOUT IN PASS 2 OR 4). 



Registers Modified: 

ACCUMULATOR 



RAM Required: 

NONE OTHER THAN MONITOR'S STACK 



ROM Required: 
35 BYTES 



INSTALL AS CHIP #7, PROM BOARD 3 



Maximum Subroutine Nesting Level: 




Assembler/Compiler Used: 
8080 ver 2.0 



Programmer: 



Comn»- 



Doug Raymond 
Zehntel 



2440 Stanwell Drive 
Concord, Ca. 94520 
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REF. NO. AC2 

PROGRAM TITLE HIGH SPEED LIST FOR INTELLEC 8 



*****AN EASILV CONNECTED LIST DEVICE***** 
INTELLEC 8 WITH 8080 CPU 
DOUG RAYMOND, ZEHNTEL, INC. 



THE FOLLOWING IS A SUBROUTINE WHICH 
PERMITS THE USE OF AN EXTERNAL LIST 
DEVICE <I. E. HIGH SPEED PRINTER) WITH 
THE INTELLEC 8 MONITOR VERSION 1. 

PRINTER CONNECTION IS MADE VIA THE 
PROM PROGRAMMING SOCKET ON THE 
INTELLECTS FRONT PANEL. 

USE OF A HIGH SPEED PRINTER SPEEDS 

ASSEMBLV TREMENDOUSLY, BECAUSE 

ONLV TWO PASSES <P=1, P=4> ARE REQUIRED 

2) HIGHSPEED READER IS NOT SLOWED 

DOWN BV THE SLOW PRINTING ON THE CONSOLE. 

PRIOR TO RUNNING THE ASSEMBLER, TVPE 
"AL=1" INTO THE MONITOR, AND THIS 
SUBROUTINE WILL BE USED TO SEND 
"LIST" INFORMATION TO THE EXTERNAL 
HIGHSPEED PRINTER. 

THE ROUTINE IS SPECIFICALLY FOR A 
CENTRONICS 206, WHOSE CHARACTERISTICS 
ARE: DATA PARALLEL ? LINE ASCII 

STROBE NORMALLY HIGH 

BUSY HIGH WHEN BUSY 

THE CENTRONICS 306 HAS SEVERAL 

JUMPER OPTIONS. TWO OF THESE ARE 

IMPORTANT FOR PROPER APPEARANCE 

OF THE LISTED MATERIAL. 

AUTOMATIC LINEFEED SHOULD BE DISABLED 

OPTION DSC SHOULD BE ENABLED. 

DATA OUT ON PIN 3 

1 2 

2 1 
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3 
4 
5 



21 
20 
19 



3712 




3712 


C31A37 


371ft 




371A 


3E00 


371C 


D3@l 


371E 


DB02 


3720 


07 


3721 


D21E37 


724 


3E80 


3726 


D301 


3728 


79 


3729 


F680 


372B 


FEFF 


372D 


C8 


372E 


2F 


372F 


D302 


3731 


F680 


3733 


D302 


3735 


E67F 


3737 


D302 


3739 


C9 


0000 





6 18 

.; STROBE OUT ON PIN 17 
jBUSY IN ON PIN 11 

; GROUND BV A CLIP LEAD TO bLQT IN CHflbSIb 
} BOTTOM. 

.;A 24 PIN WIREWRAP SOCKET CAN BE UbED 
.; FOR ft CONNECTOR. 

ORG 3712H;ENTRV POINT FOR AL=1 
JMP PRINT 

ORG 371AHJ OR OTHER AVAILABLE PROM 
; LOCATION 

PRINT: MVI A, 

OUT 1 ; ENABLES SENSING OF BUSY 

PBZ: IN 2 
RLC 
JNC PBZ jCHRRV IS TRUE IF BUSV WftS TRUE 

MVI ft. 80H 

OUT 1 ; RESTORES CONTROLS TO NORMftL 
■CHARACTER IS IN C REG 
BIT 7 IS USED ftS STROBE 



MOV ft. C 
OR I 80H 
CPI 0FFH 
RZ 
CMft 
OUT 2 
OR I 80H 
OUT 2 
FIN I 7FH 
OUT 2 
RET 
END 



s DON'T SEND RUBOUT TO CENTRONICS 206 
; I/O BOftRD IS INVERTING 



■> STROBE IS NOW ftCTIVE 
; STROBE IS RETIRED 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. AC3 



D4004 8008 [2 8080 Q 4040 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



I/O SIMULATION MACROS 

WHEN ASSEMBLED INTO A PROGRAM, THESE TWO MACROS, 'INPUT' and 'OUTPUT', 
ALLOW SIMULATION OF ALL 'IN' AND 'OUT' 8080 INSTRUCTIONS. ALL 'IN'S' 
AND 'OUT'S' ARE LOGGED ON THE INTELLEC 8/M0D80 CONSOLE 



INTELLEC 8/MOD80 AND TTY 



M0D80 MONITOR 



FOR OUT XX: OUTPUT XX = YY 

FOR IN XX: INPUT XX = (EXPECT INPUT VALUE) 



Registers Modified: 

A, FLAGS 



RAM Required: 

185 BYTES 



ROM Required: 



Maximum Subroutine Nesting Level: 

^ 8 BYTES 



Assembler/Compiler Used: 

8080 MACRO ASSEMBLER 



Programmer: 

K. BURGETT 
Company : 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB5 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 [3 8008 8080 □ 4040 



(use additional sheets if necessary) 



Tape Duplicator 



Duplicates a tape read in from the H.S. tape reader by 
punching a copy on the TTY terminal with a leader added 
at both ends. 



TTY 

H.S. Reader 

Intellec 8 



Program Object Tape 



Load the program with the system monitor. Use the system 
monitor command(s) to change the memory at address 02 to 
01H. Place the tape to be copied in the H.S. reader. Turn 
on the tape punch and press reset on the console. 



A copy of the tape being read into the H.S. reader will be 
generated by the TTY punch with a leader at both the beginning 
and end of the tape. The program automatically returns to 
the system monitor. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

Intellec 8 Macro Assembler 



Programmer: 

Jon Zoller 



Company: 

Dorsett Electronics 
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2806 
3S0C 

0100 

0100 310020 

H02 CD0638 

0106 57 

0107 A7 

0108 CA0201 

010B 1E96 

010D 0600 

010F 48 
0110 CD0C28 
0112 ID 
0114 C20D01 



REF. NO. AB5 

PROGRAM TITLE TAPE DUPLICATOR 



INPUT FROM H. 



LED 



CLEAR : 



RI 
PO 



START : 



+ 

+ 

+CLEAR : 

+ 



MACRO 

MVI 

MVI 

MOV 

CALL 

DCR 

JNZ 

ENDM 

EQU 

EQU 

ORG 

LXI 

CALL 

MOV 

ANA 

JZ 

LED 

MVI 

MVI 

MOV 

CALL 

DCR 

JNZ 



S. READER-OUTPUT TO TTV 
BLNK 
EiBLNK 

B, 00 

C, B 
PO 
E 
CLEAR 

3806H 
280CH 

100H 

SP, 2000H 

RI ; GET A CHARACTER 

D, A 

A i IS CHARACTER BLANK? 

bTART i YES, IGNORE 

150 

E, 00096H 

B, 00 

C, B 
PO 
E 
CLEAR 



0117 4A 

0118 1E0F 
011A CD0C28 
011D CD0638 

0120 4F 

0121 A7 

0122 ID 
0122 C22501 

0126 1E64 
0128 0689 
012A 48 
"'128 CD0C28 
412E ID 
012F C22801 



AGAIN: 
GO: 



+ 
+ 
+CLEAR : 

+ 
+ 
+ 



MOV 

MVI 

CALL 

CALL 

MOV 

ANA 

DCR 

JNZ 

LED 

MVI 

MVI 

MOV 

CALL 

DCR 

JNZ 



CD 

E, 15 

PO j 

RI i 

C, A 

A 

E 

JOHN 

100 

E, 00064H 

B, 00 

C, B 
PO 
E 
CLEAR 



PUNCH CHARACTER 

GET ANOTHER CHARACTER 
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0132 C3@0-<8 

0135 A7 JOHN: 

0136 CA1A01 
0139 C31801 

0000 



JMP 


3800H 


ANA 


A 


JZ 


GO 


JMP 


AG A I N 


END 
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MICROCOMPUTER USERS 
LIBRARY SUBMITTAL FORM Ref No 



AB6 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 IS 8080 



(use additional sheets if necessary I 



CBC GEN 

Generate a 16 bit cyclic redundancy check (CBC) for a data string of up 
to 2 bytes. The generator polynomial and initial conditions are defined 
by the user* 



None 



None 



BC contains size of data string in bytes 

HL points to beginning of data string 

DE contains initial value of CBC, usually all zeros or all ones 

RAM required - 2 bytes plus data string 

RAM or BOM - 60 bytes (subroutine only) 



All registers are modified 

DE contains value of CBC 

The data string is unmodified 



Registers Modified: 
All 



RAM Required: 

2 bytes plus character string 



ROM Required: 

60 bytes 



Maximum Subroutine Nesting Level: 




Assembler/Compiler Used: 
MAC80 



Programmer: 
Geoffrey Karl in 



Company: 



Applied Digital Data Systems, Inc. 



Address: 

11787 
100 Marcus Blvd., Hauppauge, N.Y. 

98-0343 
4-40 
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REF. NO. : AB6 

PROGRAM TITLE: CRC GEN-GENERATE A 16 BIT CVCLIC REDUNDANCE CHEC 



CALLING PARAMTERS 



<BC> - NO. OF BVTES 
HL - BEGINNING OF FILE 
DE - INITIAL CONDITION OF CRC REGISTER 



RETURNING PARAMETERS 







i 


<DE> • 


- CRC 


0100 




.< 


ORG 


108H 


0100 


000 


POINT: 


DW 


0000 






DATA : 


DB 


OFEH 


0103 


00 




DB 


00 


0104 


00 




DB 


00 


L05 


05 




DB 


05H 


0106 


00 




DB 


00 


0021 




GX1 


EQU 


21H 


0010 




GX2 


EQU 


10H 



; MEMORY LOCATION NEEDED BV SUBRO 
; TEST PATTERN, 5 BVTES 

; IF CRC REGISTER IS INIT. 
; TO ALL ONES, CRC I S 1E07 



i FOR THIS EXAMPLE 

i G < X > =X <. 16 > +X < 12 > +X < 5 > +1 



CALLING PROGRAM FOR SUBROUTINE VERIFICATION 



010? 


310001 


CALLPR:LXI 


SP, 0100H 


010A 


010500 


LXI 


B, 0005H 


010D 


210201 


LXI 


H, DATA 


0110 


11FFFF 


LXI 


D, 0FFFFH 


0113 


CD1D01 


CALL 


CRCGEN 


0116 


EB 


XCHG 




0117 


220001 


SHLD 


POINT 


011A 


C30O38 


JMP 


3800H 



,SET UP PARAMETERS TO ALL 
i CRCGEN 



; TEST OVER, STORE CRC IN POINT 
.; RETURN TO 8080 MONITOR 



ACTUAL SUBROUTINE STARTS HERE 



011D 


220001 


CRCGEN 


SHLD 


POINT 


0120 


C5 




PUSH 


B 


0121 


El 




POP 


H 


0122 


0E08 




MVI 


C, 8 


...124 


E5 


CRC2 : 


PUSH 


H 


0125 


2A0001 




LHLD 


POINT 


0128 


46 




MOV 


B, M 



i POINT IS LOC. OF NEXT P<X> 

i HL - BVTE CTR 
JC - BIT CTR 

.= LOAD <.&> § POINT 

.; <LOAD B NEXT P<X>> 
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0129 


23 




I NX 


H 


012A 


220001 




SHLD 


POINT 


012D 


El 




POP 


H 


012E 


7B 


CRC4 : 


MOV 


A, E 


012F 


o_i- 




ADD 


E 


0130 


5F 




MOV 


E, A 


0131 


7A 




MOV 


A, D 


0132 


8A 




ADC 


D 


0133 


57 




MOV 


D, A 


0134 


DA5401 




JC 


CRC3 


0137 


78 




MOV 


A, B 


0138 


80 




ADD 


B 


0139 


47 




MOV 


B, A 


013A 


D24501 




JNC 


CRCOUT 


013D 


7B 


CRCXOR 


; MOV 


A, E 


013E 


EE21 




XRI 


GX1 


0140 


5F 




MOV 


E, A 


0141 


7A 




MOV 


A, D 


142 


EE10 




XRI 


GX2 


0144 


57 




MOV 


D, A 



0145 0D 

0146 C22E01 

0149 0E08 
014B 2D 
014C C22401 
014F 25 

0150 F22401 

0153 C9 

0154 78 

0155 80 

0156 47 

0157 DA4501 
015A C33D01 

0000 



CRCOUT : DCR 



CRC3 



C 



,TNZ 


CRC4 


MVI 


C. 8 


DCR 


L 


JNZ 


CRC2 


DCR 


H 


JP 


CRC2 


RET 




MOV 


A, B 


ADD 


B 


MOV 


B, A 


JC 


CRCOUT 


JMP 


CRCXOR 



; SHIFT CRC LEFT <DE> 



JUMP IF MSB = 1 
SHIFT P <X) LEFT <&> 

JUMP IF MSB = 
XOR CRC & G<X> 



.;CK BIT CNT 
; CK WORD CNT 



■MIFT LEFT POO 



JUMP IF MSB = 1 
JUMP TO XOR, MSB 



y 



END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM **. no 



AB7 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 D 4040 □ 8008 B 8080 



(use additional sheets if necessary) 



16 bit CRC for polynomial X16+X12+X5+1 (polynomial for SDLC) 

Produces a 16 bit CRC with 8 bit input bytes. Care should be taken 
with Most/Least bit feeding of the data byte and CRC residue. Does 
not require a table or contain any loops. Requires 2k\\ memory locations 
and executes in 72.5 usee. 



None 



Main program to include routine as in-line code or modified routine 
to be called as subroutine. 



Register "A" is data byte 

Register "B" is low byte of CRC residue 

Register "C" is high byte of CRC residue 



CRC residue in registers B 6 C 



Registers Modified: 

A. B. C. D. E. L 



RAM Required: 
2frH bytes. 



ROM Required: 
24H bytes 



tfft- 



Assembler/Compiler Used: 

8080 Macro Assembler, Ver 1.0 



Programmer: 
Bill McGonigal 



Maximum Subroutine Nesting Level: 



L 



Company: 

Sycor 



Address: 



100 Phoenix Drive 

Ann Arbor, Michigan *»8l04 



98-034B 
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WlUW 
0100 


A9 


0101 


57 


L02 


OF 


0103 


OF 


0104 


OF 


0105 


0F 


0106 


5F 


0107 


AA 


0108 


E6F0 


010A 


AS 


010B 


6F 


010C 


7B 


01 0D 


07 


010E 


E61F 


0110 


AD 


0111 


6F 


0112 


7A 


0113 


07 


0114 


E601 


0116 


A8 


0117 


AD 


0118 


47 


0119 


7B 


011A 


E60F 


011C 


AA 


011D 


4F 


011E 


7B 


HF 


AA 


ol20 


07 


0121 


E6E0 


0123 


A9 



REF NO. 
PROGRAM 



AB7 
16 BIT 



CRC FOR POLYNOMIAL X16+X12+X5+1 < POLYNOMIAL FOR 



CRC SUBROUTINE 

POLYNOMIAL IS X16 +X12 +X5 +1 

CRC USES MOST SIGNIFICANT BIT < BACKWARDS) 

REG B IS LOW BYTE OF CRC RESIDUE 

REG C IS HIGH BYTE OF CRC RESIDUE 

DATA BYTE IS EXPECTED IN THE 

ACCUMULATOR 



ENTRY 



ORG 


100H 


XRA 


C 


MOV 


D, A 


RRC 




RRC 




RRC 




RRC 




MOV 


E, A 


XRA 


D 


AN I 


0F0H 


XRA 


B 


MOV 


L, A 


MOV 


A, E 


RLC 




AN I 


1FH 


XRA 


L 


MOV 


L, A 


MOV 


A> D 


RLC 




AN I 


1 


XRA 


B 


XRA 


L 


MOV 


B, A 


MOV 


A, E 


AN I 


0FH 


XRA 


D 


MOV 


C, A 


MOV 


A, E 


XRA 


D 


RLC 




AN I 


OEOH 


XRA 


c 



i X-OR DATA BYTE 
J WITH CRC HIGH BYTE 
J TEMP STORE IN REG D 
J ROTATE RIGHT FOUR BITS 



; RESTORE (TEMP SAVE> 

.: MASK 
; RESTORE 

; MASK 

; LOW BYTE IS COMPLETE 
i MASK 
.: STORE 

; MASK 
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0124 4F MOV C, A 

012 -, 76 HLT ■> <NOT PART OF 

; SUBROUTINE) 

O000 END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB8 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 D 8080 



(use additional sheets if necessary) 



CRC16 

This macro calculates a CRCI6 check word using the Generation 
polynomial X**.6 + X**l 5+ X**2 + , . , t can be used to generate a 
check word for a record that doesn't include one or to check 
that a record including a check word is correct. 



8080 



MAC80 for assembly 



"BUFF" is the address to a word that contains the address to 
crse first byte in the record to be included in the CRC16 



accumulation. 



is the address to a word that contains the number of 



'TEN' 

bytes to be included in the CRC16 accumulation not including 
the two check bytes. The record for which the CRC16 is to 
r2 <• T St ° CCUpy conse cutive bytes in memory. If 

on* !h-'? t0 k ! 9e 2 e ^ te ^ f ° r a reCOrd that doesn,t contain 
one the two bytes following the record where the CRC16 
usually lies must be zero. 

The CRC16 check word is left in the BC register pair, B being 

Sl'ZZl S,g V f 'u ant , byte ' The HL ™S»«er pair contains 
Th! rpn reSS t ° the . ,east significant check byte in the record. 
The CPU zero flag is set if and only if the BC register pair =0 
This occurs if the record contains a correct CRC16 check word. 
The A, D, and E registers are left undefined. The record 
address vector and record length are not changed. 



Registers Modified: 
All 



RAM Required: 

6 bytes (in stack) 



ROM Required. 



First call : 64 bytes 
Other calls: 10 bytes 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
MAC80 



Programmer: 

Gerald Berger 



Company: 



Cybernetics Int. AB 



Box U8 
Address: Ddiideiyd, Sweden 



98-034B 
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i REF. NO. RB8. 

i PROGRAM NAME CRC16 



TITLE 



CRC16 



FUNCTION THIS MACRO CALCULATES A CRC16 CHECK WORD 
THE GENERATION POLVNOMIAL X**l€+X**15+X**2+1. IT 
CAN BE USED TO GENERATE A CHECK WORD FOR A RECORD T 
DOESN'T INCLUDE ONE OR TO CHECK THAT A RECORD INCLU 
A CHECK WORD IS CORRECT 



REQUIRED HARDWARE 
REQUIRED SOFTWARE 



8080 



— MAC80 FOR ASSEMBLY 



INPUT PARAMETERS 

THE MACRO CALL INCLUDES 2 PAAMETERS 

BUFF "BUFF" IS THE ADDRESS TO A WORD THAT CON 
THE ADDRESS TO THE FIRST BVTE IN THE RECORD TO BE 
INCLUDED IN THE CRC16 ACCUMULATION. 

LEN "LEN" IS THE ADDRESS TO A WORD THAT CONT 
THE NUMBER OF BVTES TO BE INCLUDED IN THE CRC16 
ACCUMULATION NOT INCLUDING THE TWO CHECK BVTES. 
THE RECORD FOR WHICH CRC16 IS TO BE CALCULATED MUST 
CONSECUTIVE BVTES IN MEMORV. IF A CRC16 IS TO BE 
GENERATED FOR A RECORD THAT DOEN'T CONTAIN ONE, THE 
BVTES FOLLOWING THE RECORD WHERE THE CRC16 USUALLV 
MUST BE 2ER0. 

OUTPUT RESULTS 

THE CRC16 CHECK WORD IS LEFT IN THE BC REGISTER PA I 
B BEING THE MOST SIGNIFICANT BVTE. THE 
HL RREGISTER PAIR CONTAINS THE ADDRESS TO THE LEAST 
SIGNIFICANT CHECK BVTE IN THE RECORD. THE 
CPU ZERO FLAG IS SET IF AND ONLV IF THE BC 
REGISTER PAIR = 0. THIS OCCURS IF THE RECORD 
CONTAINS A CORRECT CRC16 CHECK WORD. THE A, D, AND E 
REGISTERS ARE UNDEFINED. THE RECORD ADDRESS VECTOR 
AND RECORD LENGTH ARE NOT CHANGED. 

DESCRIPTION 
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1000 



FFFF 



XCRCF 
CRC16 



XCRCF 
XCRCS 

NBVF : 



NBIT: 



THE MACRO USES A SUBROUTINE XCRCS TO GENERATE THE 
r:Rr:±K CHECK WORD. THE CODE FOR THIS SUBROUTINE IS 
GENERATED BV THE MACRO AT THE FIRST CALL TO THE MAC 
ONLV. XCRCS USES 4 BVTES OF RAM MEMORV IN THE STACK 
FOR TEMPORARV DATA STORAGE AND IS THUS REENTRANT. 

TIMING 71600 STATES PER 100 BVTES 

RAM REQUIRED 6 BVTES IN STACK 



RCM REQUIRED 



FIRST CALL 
OTHER CALLS 



64 BVTES 
10 BVTES 



ORG 



SET NOT 

MACRO 

LHLD 

XCHG 

LHLD 

IF 

SET 

JMP 

MOV 
I NX 
MOV 

I NX 

MOV 

PUSH 

PUSH 

LXI 

mvi 



RAR 
MOV 
MOV 
RAR 
MOV 
MOV 
RAR 
MOV 
JNC 

XRA 



1000H 

CRC16 





BUFF, LEN 
LEN 

BUFF 
XCRCF 



BVPAS 

B, M 
H 

C, M 

H 

A, M 

H 

D 

H, 0A001H 

E, 8 



D, A 
H.» •— 

C, A 

A, B 

B, A 
NOD IV 



; USED FOR TEST PURPOSES ONLV 



LENGTH OF RECORD IN DE 
ADDRESS TO BUFFER IN HL 
GENERATE CODE IF FIRST CALL TO 

HOP PAST SUBROUTINE 

FIRST BVTE OF RECORD TO 8 

SECOND BVTE TO C 

PROCESS NEXT BVTE 

ADDRESS TO NEXT BVTE IN HL 

NEW BVTE TO A 

STORE CURRENT ADDRESS IN STACK 

; GENERATION POLYNOMIAL TO HL 

; INITIALIZE BIT COUNT IN E 

; PROCESS NEXT BIT 

; SHIFT NEXT BIT OF NEW BVTE INTO 

;SAVE NEW BVTE IN D 



j AND INTO C 

;SHIGTFT MOST SIGNIFICANT BIT IN 



HERE IF SD IV I SABLE 
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NODIV: 



BVPAS 



0000 



MOV 


B, A 


MOV 


A, C 


XRA 


H 


MOV 


C, A 


MOV 


A, D 


DCR 


E 


JNZ 


NBIT 


POP 


D 


POP 


H 


DCR 


E 


JNZ 


NBVTE 


DCR 


D 


JP 


NBVTE 


MOV 


A, B 


ANA 


A 


RNZ 




ADD 


C 


RET 




END IF 




CALL 


XCRCS 


ENDM 




END 





NEW BVTE BACK TO A 



i HERE IF BVTE DONE 

i NUMBER OF BVRTES LEFT TO DE 

J ADDRESS TO LAST BVTE PROCESSED 

i DECREASE LENGTH COUNT BV 1 

i TAKE NEXT BVTE IF NOT DONE 



i HERE IF RECORD DONE 
.= SET ZERO FLAG IF BC=0 



i CALCULATE CRC16 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB9 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 D 4040 □ 8008 0c 8080 



(use additional sheets if necessary) 



CREOi 

Computes CRC characters for IBM compatible floppy disk. Also works for 
Synchronous Data Link Control (SDLC). 



None 



None 



HL = start address of data 
DE = end address of data 



BC = CRC characters 



Registers Modified: 

A.B.C.H.L 


Assembler/Compiler Used: 

8080 Assembler 


RAM Required: 

50 10 


Programmer: 

Dick Springer 


ROM Required: 

None 


Company: 

General Microwave Corporation 


Maximum Subroutine Nesting Level: 

None 


Address: 

155 Marine Street 
Parminedale. N.Y. 11735 



98-034B 

4-53 
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REF NO. FIB? 
PROGRAM CRECH 



SUBROUTINE CRECH COMPUTES THE CRO CHECK HOPD* REOmppn eno 
•READING FROM OR WRITING ON IBM-FORMAT FLOPPED I U- fS E TUO 
' BVTE CHECK WORD FOR A BLOCK OF DATA IS THE WORD PRODDED BV 

; , T iSr °fS ERRTINQ POL ™OMIAL X**16 + X* + 12^:4*5 + l WHEN THE r^EcV 
•WORD IS INITIALIZED TO THE VALUE OFFFFH. 

: THE SUBROUTINE INITIALIZES THE CHECK WORD TO 0FFFFH AND 
; PROCESSES A BLOCK OF DATA WITH INITIAL MEMORV LOCATION TM 

J pA J p S ir E C RI ?HF^r?^" NflL MEM ° RV L °™^ IN RASTER 
H?tS tSp ptpS p-trF. l"!* flPPEftRS IN REGISTER PAIR <B, C> 

; : bvte In register b ° N ™ E DISK IN REGISTER c ftND THE sc°» 

^E ^e'paS^J 2S£e£5? ;N"!«-IZflTION IS DESIRED, AS MAV 
' fl BmrK ncpnCcS ?m S !5 NG IS TU BE CONTINUED AFTER PROCESSING 
: ? f ,c^tL Vm ^ RE IN MEM0RV ' THE INITIAL VALUE SHOULD BE 
; INbERTED IN <B, C> AND THE ROUTINE ENTERED AT LOCATION CRECH+3. 

-AFTER PROCESSING, REGISTER PAIR <B, C> CONTAIN*: THE PHECk unpr. 
•plr .-tpp p-Jc <D ' E> C0NTflIN THE IMPUT FINAL ADDReI. X 
^HE^aI? bStE PROCESSED 101 " ™ E ""^ F ° LL ° WING ™ T * 

' : IS PROCESSED ° DDRESS PRECEDE S THE INITIAL ADDRESS ONE BVTE 



0009 01FFFF CRECH: LXI B, SFFFFH 
00O2 D5 p USH D 

000-1 ?E M oV A.M 



0005 A9 

0006 

000? 8F pp r: 



KRA C 
MOV D, A 



088S G*F pp'p 

0889 8F ppi". 

000A OF ppp 

008B E68F RNI 0FH 

WUD AA xRfj D 

000E 5F M0V E , fl 

008F 8F p Rr 

0018 8F ppr- 

8811 OF ppr 

0012 57 M0V Dj ft 



8812 E€1F mi 



•TifS-i "=; 



fiS XRA B 



1FH 
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6*A6 

Q017 
01318 
0G1A 

001B 
001C 

001D 
0Q1E 

0020 
0021 

0022 

0023 

0624 

0025 

0026 

©027 

002A 

902B 

002C 

002D 

0000 



4F 

7A 

E6E0 

AB 

47 

7A 

0F 

E6F0 

A9 

4F 

0~: 

Dl 

7A 

BC 

D8 

C20200 

7B 

BD 

D8 

C2Q300 



MOV 


C, A 


MOV 


A, D 


AN I 


0E0H 


XRA 


E 


MOV 


B, A 


MOV 


A, D 


RRC 




AN I 


0F0H 


XRA 


C 


MOV 


C, A 


I NX 


H 


POP 


D 


MOV 


A, D 


CMP 


H 


RC 




JNZ 


CRECH+2 


MOV 


A, E 


CMP 


L 


RC 




JMP 


CRECH+2 


END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB10 



D 4004 □ 4040 Q 8008 □ 8080 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



Legible paper tape 



The program punches legible characters on paper tape, 
useful for tape labelling. The characters are formed in 
the conventional 5x7 matrix and the 64 character sub-set 
of ASCII is represented. The characters to be punched arc 
taken from the console device and decoded as an index 
into a table of bit patterns. Console input is convenient 
where a separate punch is available but is not a necessary 
part of the logic: a list of characters could as easily 
be referenced. Carriage return, line feed and the control 
characters are echoed but not punched. 

Hardware: console and paper tape punch 



Console I/O and punch output routines of Intellec 8 
monitor. 



ASCII characters in A 



Legible paper tape: bit patterns presented to punch 
output routine in B 



Registers Modified: 
A,B,C,D,E,H,L 



RAM Required: 



387 decimal 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

ISIS 8080 Macro Assembler, VI. 



Programmer: 

Intellec 3 Macro assembler 



Company: 



P.R. Cave 



JflL 



Address: Dept . Mechanical iingrg. 
The University, Dundee 



98-034B 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref No 



ABU 



D 4004 □ 4040 II 8008 B 8080 



(use additional sheets if necessary) 



Program 
Title 

Function 



Banner Print & Punch 

Create, on a listing device or tape perforator, a graphic 
representation of certain ASCII characters. 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



CBAN Console Keyboard, List Device 

LEAN List Device 

CPBN Console Keyboard, Tape Perforator 

PBAN Tape Perforator 



None 



Output 
Results 



CBAN 
CPBN 

IB AN 
PBAN 



Console Keyboard Input 



The B and C registers contain the high and low bytes resDectively 
of the address of a buffer. The buffer contains the ASCII codes' 
for the characters to be printed or punched, and is terminated by 
the ASCII code for carriage return (ODH). 'Care should be taken 
that the granhic representations of the specified characters will 
fit on one line of the list device. Legal characters include the 
alphabet, the digits and special characters: Space, comma, *, +,-, 
•» /» '» $,<,= >>,?, and a. 

CBAN Graphic representations of the inout characters drawn on the ont- 
LBAN out from the .listing device. Each character is drawn in a 1, 
3, or ? by 7 matrix with 2 columns between characters. 

CPBN Graphic representations of the incut characters drawn on perfor- 
PBAN ated taoe. tach character is drawn in a 1, 3, or ? by 7 matrix 
with 2 blanks between characters. 



Registers Modified: 



All 



RAM Required: 



'16 bvtes 



ROM Required: 



^7 bytes 



Maximum Subroutine Nesting Level: 

3 



Assembler/Compiler Used: 
8008 Macro Assembler Ver. 20 



Programmer: 

C. E. Ohme 



Company: 

Ohme 



Address: y^ Winding ^ 
Fremont, CA 9ii^38 



98-034B 
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REF. NO. AB11 

PROGRAM TITLE BANNER PRINT & PUNCH 



1000 



ORG 



1000H 



000D 
000A 



BANNER ROUTINES 

MACROS TO SIMULATE 8080 INSTRUCTIONS 
(VALID ONLV IN THESE ROUTINE) 



CR 
LF 



EQU 
EQU 



ODH 
0AH 



; CARRIAGE RETURN 
; LINE FEED 



THE CBAN ROUTINE ACCEPTS CHARACTERS 
FROM THE CONSOLE AND DRAWS THEM ON 
THE LIST DEVICE. A CARRUAGE RETURN 
TERMINATES EACH LINE. PLEASE STAY 
ON THE PAPER. 



1000 


CD5E11 


1003 


1640 


1005 


21CB12 


1008 


22C512 


100B 


7C 


100C 


45 


100D 


21C512 


1010 


70 


1011 


22 


1012 


CDC112 


1015 


77 


1016 


67 


1017 


68 


1018 


22C712 


101B 


7C 


101C 


45 


101D 


21C712 


1020 


70 


1021 


23 


1022 


CDC112 


J25 


77 


1026 


67 


1027 


68 



CBAN : 



CB1: 



CALL 


CRLF 


i PRINT CR LF 


MVI 


D, 40H 


;MASK FOR LINE 1 


LXI 


H, BUFF 


i BUFFER ADDR 


SHLD 


BADR 


; INIT BADR 


MOV 


A, H 




MOV 


B, L 




LXI 


H, BADR 




MOV 


M, B 




I NX 


H 




CALL 


INCHL 




MOV 


M, A 




MOV 


H, A 




MOV 


L, B 




SHLD 


CADR 


; SAVE CAHR ADDR 


MOV 


A, H 




MOV 


B, L 




LXI 


H, CADR 




MOV 


M, B 




I NX 


H 




CALL 


INCHL 




MOV 


M, A 




MOV 


H, A 




MOV 


L, B 
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1028 CDB512 


CALL 


CI 


102B E67F 


AN I 


7FH 


102D 5F 


MOV 


E, A 


102E 2AC712 


LHLD 


CADR 


1031 21C712 


LXI 


H, CADR 


1024 7E 


MOV 


A, M 


1025 22 


I NX 


H 


1026 CDC112 


CALL 


INCHL 


1029 66 


MOV 


H, M 


102A 6F 


MOV 


L, A 


102B 7B 


MOV 


A, E 


102C 77 


MOV 


M, A 


102D FE0D 


CPI 


CR 


102F CA6210 


JZ 


EOP 


1042 CDEC10 


CALL 


CONV 


1045 DA1810 


JC 


CB1 


348 CD1E11 


CALL 


BCH 


104B 2AC712 


LHLD 


CADR 


104E 21C712 


LXI 


H, CADR 


1051 7E 


MOV 


A, M 


1052 22 


I NX 


H 


1052 CDC112 


CALL 


INCHL 


1056 €€ 


MOV 


H, M 


1057 CDC112 


CALL 


INCHL 


105A 6F 


MOV 


L, A 


105B 22 


I NX 


H 


105C CDC112 


CALL 


INCHL 


105F C21810 


JMP 


CB1 


1062 CDB210 EOF: CALL 


EOL 


1065 CD5E11 


CALL 


CRLF 


1068 CD5E11 


CALL 


CRLF 


106B C20810 


JMP 


CBAN 



; INPUT A CHAR 

j REMOVE PARITY 

; SAVE CHAR 

; RESTORE CHAR ADDR 



i CHAR TO DRAW 
i STORE CHAR 

.i CAP RET 

; IF END OF INPUT 

; CONVERT CHAR 

; IF ILLEGAL 

; PRINT LINE 1 

i RESTORE CHAR ADDR 



J6E 


60 


LBAN : 


MOV 


H, B 


106F 


69 




MOV 


L/C 


1070 


22C512 




SHLD 


BADR 



.; FOR NEXT CHAR 



.; LOOP 

■ t COMPLETE PICTURE 

i PRINT CR LF 

.: PRINT CR LF 

; FOR NEXT PICTURE 



THE LBAN SUBROUTINE ACCEPTS THE ADDRESS OF A 
BUFFER IN THE B AND C REGISTERS. ASCI 
CHFlPftCTER S IN THE BUFFER ARE DRAWN ON THE 
LIST DEVICE UNTIL AN ASCII CARRIAGE RETURN 
I A ENCOUNTERED. 



BUFFER ADDR H 
BUFFER ADDR L 
SAVE BUFFER ADDR 
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1873 


7C 


1874 


45 


1875 


21C512 


1878 


70 


1879 


23 


187A 


CDC112 


187D 


77 


187E 


67 


187F 


68 


1888 


CD5E11 


1883 


1640 


1885 


2AC512 


1888 


21C512 


188B 


7E 


188C 


23 


188D 


CDC112 


1898 


66 


1891 


6F 


1892 


7E 


1893 


FE8D 


1895 


CAB218 


1898 


CDEC18 


189B 


D41E11 


189E 


2AC712 


18A1 


21C712 


10A4 


7E 


10A5 


23 


18A6 


CDC112 


10A9 


66 


18AA 


6F 


16AB 


23 


18AC 


CDC112 


18AF 


C39218 


10B2 


CD5E11 


10B5 


7A 


10B6 


IF 


10B7 


E67F 


10B9 


C8 


10BA 


57 


'9BB 


C38518 



LB1: 



LB2: 



EOL: 



MOV 


A, H 


MOV 


B, L 


LXI 


H, BADR 


MOV 


M, B 


I NX 


H 


CALL 


INCHL 


MOV 


M, A 


MOV 


H, A 


MOV 


L, B 


CALL 


CRLF 


MVI 


D, 48H 


LHLD 


BADR 


LXI 


H, BADR 


MOV 


A, M 


I NX 


H 


CALL 


INCHL 


MOV 


H, M 


MOV 


L, A 


MOV 


A, M 


CPI 


CR 


JZ 


EOL 


CALL 


CONV 


CNC 


BCH 


LHLD 


CADR 


LXI 


H, CADR 


MOV 


A.. M 


I NX 


H 


CALL 


INCHL 


MOV 


H, M 


MOV 


L, A 


I NX 


H 


CALL 


INCHL 


JMP 


LB2 


CALL 


CRLF 


MOV 


A, D 


RAR 




AN I 


7FH 


RZ 




MOV 


D, A 


JMP 


LB1 



.; PRINT CR LF 
J MASK FOR LINE 
; BUFFER ADDR 



CHAR TO DRAW 

CAR RET 

IF END OF LINE 

CONVERT CHAR 

IF LEGAL CHAR 

RESTORE CHAR ADDR 



.; FOR NEXT CHAR 



; LOOP 

; PRINT CRLF 

.: MASK 

; FOR NEXT LINE 

J REMOVE TOP BIT 

.: IF PICTURE DONE 

; MASK 

iLOQP 



THE CPBN ROUTINE ACCEPTS CHARACTERS 
FROM THE CONSOLE AND DRAWS THEM ON 
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THE PUNCH DEVICE. 



16BE 
18C1 
10C3 
IOCS 
10C9 



CDB512 
E67F 
CDEC10 
D46811 

C3BE10 



CPBN: 



CALL 


CI 


AN I 


7FH 


CALL 


CONV 


CNC 


PCH 


JMP 


CPBN 



INPUT A CHAR 
REMOVE PAR I TV 
CONVERT CHAR 
IF LEGAL CHAR 

LOOP 



THE PBAN SUBROUTINE ACCEPTS THE ADDRESS OF A 
BUFFER IN THE B AND C REGISTERS. ASCII 
CAHARACTERS IN THE BUFFER ARE DRAW ON THE 
PUNCH DEVICE UNTIL AN ASCII CARRIAGE RETURN 
IS ENCOUNTERED. 



10CC 


60 PBAN : MOV 


H, B 


10CD 


69 


MOV 


L, C 


10CE 


7E PB1 : MOV 


A, M 


10CF 


FE0D 


CPI 


CR 


10D1 


C8 


RZ 




10D2 


CDEC10 


CALL 


CONV 


10D5 


D46811 


CNC 


PCH 


"1D8 


2AC712 


LHLD 


CADR 


X0DB 


21C712 


LXI 


H, CADR 


10DE 


7E 


MOV 


A, M 


10DF 


23 


I NX 


H 


10E0 


CDC112 


CALL 


INCHL 


10E3 


66 


MOV 


H, M 


10E4 


6F 


MOV 


L, A 


10E5 


23 


INX 


H 


10E6 


CDC112 


CALL 


INCHL 



10E9 C3CE10 



BUFFER ADDR H 
BUFFER ADDR L 
CHAR TO DRAW 
CAR RET 

IF END OF BUFFER 
CONVERT CHAR 
IF LEGAL CHAR 
; RESTORE CHAR ADDR 



10EC 


5F 


10ED 


22C712 


10F0 


7C 


10F1 


45 


10F2 


21C712 


10F5 


70 


• 4 -W6 


23 


jF? 


CDC112 


10FA 


77 



CONV : 



JMP 



PB1 



; FOR NEXT CHAR 



LOOP 



CONV CONVERTS THE CHARACTER IN A TO A CRAF 
TABLE ORDINAL IN H AND L. THE CHARACTER lb 
SAVED IN E. THE ORIGINAL H AND L ARE STORED 
AT CADR. D IS PRESERVED. 



SAVE CHAR 
SAVE CHAR ADDR 



MOV 


E, A 


SHLD 


CADR 


MOV 


A, H 


MOV 


B, L 


LXI 


H, CADR 


MOV 


M, B 


I NX 


H 


CALL 


INCHL 



MOV 



M, A 
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10FB 


67 


10FC 


68 


10FD 


7B 


10FE 


D620 


1100 


D8 


1101 


CA1211 


1104 


D60A 


1106 


D8 


1107 


FE31 


1109 


C21B11 


110C 


C601 


110E 


47 


110F 


87 


1110 


87 


1111 


80 


1112 


C6A2 


1114 


6F 


1115 


3E11 


1117 


CE00 


1119 


67 


-1A 


C9 


xllB 


C6FF 


HID 


C9 



FND: 



CNVER : 



MOV 


H, A 










MOV 


L, B 










MOV 


A, E 








i CHAR TO CONVER 


SUI 


x x 








y SPACE 


RC 










i IF < SPACE 


JZ 


FND 








i IF SPACE 


SUI 


'*'-' 


x 






; * = 


RC 










i IF< * 


CPI 


'Z'+l- 


' * 


•■ 




J CHECK FOR > Z 


JNZ 


CNVER 








; IF > Z 


AD I 


1 








; * = 1 


MOV 


B, A 








i CHAR INDEX 


ADD 


A 








.: 2 * CHAR INDEX 


ADD 


A 








;4 * CHAR INDEX 


ADD 


B 








; 5 * CHAR INDEX 


AD I 


GRAF AND 


0FFH > 


GRAF BASE L 


MOV 


L, A 








;GRAF L 


MVI 


A, GRAF 


SHR 


8 


; GRAF BASE H 


AC I 











i GRAF H 


MOV 


H, A 








; GRAF H 


RET 












AD I 


0FFH 








i SET CARRV 


RET 













BCH PRINTS ONE LINE OF THE CHARACTER 
WHOSE GRAF ORDINAL IS IN H AND L UPON 
ENTRY. THE LINE PRINTED IS DETERMINED 
BV THE MASK IN D. 



HIE 


0E05 BCH: MVI 


C, 5 


1120 


22C912 BCH1 : SHLD 


GADR 


1123 


7C 


MOV 


A, H 


1124 


45 


MOV 


B, L 


1125 


21C912 


LXI 


H, GADR 


1128 


70 


MOV 


M,B 


1129 


23 


I NX 


H 


112A 


CDC112 


CALL 


INCHL 


112D 


77 


MOV 


M, A 


112E 


67 


MOV 


H, A 


112F 


68 


MOV 


L, B 


1130 


7E 


MOV 


A, M 


1131 


A7 


ANA 


A 


1132 


FA5411 


JM 


BCH3 


'•1.35 


43 


MOV 


B, E 


-36 


A2 


ANA 


D 


1137 


C23C11 


JNZ 


BCH2 


113A 


0620 


MVI 


B, - •- 



COL COUNT 
SAVE GRAF ADDR 



; GRAF CODE 

i SET FLAGS 

.•• IF END OF CHAR 

i CHAR TO PRINT 

i GRAF BIT 

.= TO PRINT CHAR 

; SPACE 
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113C CD9C12 BCH2 
113F 2AC912 
1142 21C912 

1145 7E 

1146 23 

1147 CDC112 

114A SS 
114B 6F 

114C 23 
114D CDC112 

1150 0D 

1151 C22011 

1154 6620 BCH: 
1156 CD9C12 
1159 0620 
115B C39C12 



L5E 060D CRLF 
xl60 CD9C12 
1163 060fl 
1165 C39C12 



CALL 


LO 


LHLD 


GADR 


LXI 


H, GADR 


MOV 


A, M 


I NX 


H 


CALL 


INCHL 


MOV 


H, M 


MOV 


L, A 


INX 


H 


CALL 


INCHL 


DCR 


C 


JNZ 


BCH1 


MVI 


B, '" ' 


CALL 


LO 


MVI 


B, '• ■' 


JMP 


LO 



i PRINT CHAR OR SP 
; RESTORE GRAF ADDR 



1168 


0E05 PCf- 


i; MVI 


C, 5 


116A 


22C912 PCH1 : SHLD 


GADR 


116D 


7C 


MOV 


A, H 


116E 


45 


MOV 


B, L 


116F 


21C912 


LXI 


H, GADR 


1172 


70 


MOV 


M, B 


1173 


23 


INX 


H 


1174 


CDC112 


CALL 


INCHL 


1177 


77 


MOV 


M, A 


1178 


67 


MOV 


H, A 


1179 


68 


MOV 


L, B 


117A 


7E 


MOV 


A, M 


117B 


A7 


ANA 


A 


117C 


FA9811 


JM 


PCH2 


117F 


47 


MOV 


B, A 


- 1.80 


CDB012 


CALL 


PO 


^83 


2AC912 


LHLD 


GADR 


1186 


21C912 


LXI 


H, GADR 


1189 


7E 


MOV 


A, M 



;FOR NEXT GRAF 



.; DECR COL CNT 

i IF MORE 

; SPACE 

.; BETWEEN CHARS 

i SPACE 

.; SPACE AND RET 



CRLF PRINTS CARRIAGE RETURN, LINE FEED 
MVI B, CR i CAR RET 

CALL LO > LIST 

MVI B, LF i LINE FEED 

.JMP LO J LIST AND RET 

PCH PUNCHES THE CHARACTER WHOSE GRAF 

ORDINAL IS IN H AND L UPON ENTRV 



; CHAR COUNT 

.; SAVE GRAF ADDR 



.; GRAF CODE 

.; SET FLAGS 

; IF END OF CHAR 

; GRAF CODE 

.; PUNCH CODE 

> RESTORE GRAF ADDR 
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118A 23 
118B CDC112 

118E 66 

118F 6F 

1190 23 

1191 CDC112 

1194 0D 

1195 C26A11 
1198 0600 

119A CDB012 
119D 0600 
119F C3B012 



pch; 



I NX 
CALL 

MOV 
MOV 

I NX 
CALL 

DCR 
JNZ 
MVI 

CALL 

MVI 

JMP 



H 
INCHL 

H, M 
L, A 

H 
INCHL 

C 

PCH1 
B, 

PO 
B, 
PO 



; FOR NEXT GRAF 



;DECR CHAR CNT 
.■ IF MORE 
.: BLANK 

; BETWEEN CHARS 

.; BLANK 

.: BLANK AND RET 



11A2 


00000000 GRAF : 


DB 


'.A6 


00 




llA7 


14081480 


DB 


11AB 


80 




11AC 


081C0880 


DB 


11B0 


80 




11B1 


03808080 


DB 


11B5 


80 




11B6 


08080880 


DB 


11BA 


80 




11BB 


01808080 


DB 


11BF 


80 




11C0 


03040810 


DB 


11C4 


60 




11C5 


3E414141 


DB 


11C9 


3E 




11CA 


217F0180 


DB 


11CE 


80 




11CF 


21434549 


DB 


11D3 


36 




11D4 


22414949 


DB 


11D8 


36 




11D9 


0C14247F 


DB 


HDD 


04 




11DE 


7A494949 


DB 


11E2 


46 




•^.E3 


3E494949 


DB 


JE? 


26 




11E8 


43444850 


DB 


11EC 


60 





THE GRAF TABLE CONTAINS THE GRAPHIC 
DESCRIPTION OF THE LEGAL CHARACTERS. 



00H, 00H, O0H, O0H, O0H ; SP 

14H, 08H, 14H, 80H.. 80H ; * 

08H, 1CH, 08H, 80H, 80H ; + 

03H, 80H.. 80H, 80H, 80H .i , 

08H, 08H, 08H, 80H.. 80H ; - 

01H, 80H, 80H, 80H, 80H ; . 

03H, 04H, 08H, 10H, 60H ; / 

3EH, 41H, 41H, 41H, 3EH ; 

21H, 7FH, 01H, 80H, 80H ; 1 

21H, 43H, 45H, 49H, 36H ; 2 

22H, 41H, 49H, 49H, 36H ; 3 

OCH, 14H, 24H, 7FH, 04H ; 4 

7AH, 49H, 49H, 49H, 46H ; 5 

3EH, 49H, 49H, 49H, 26H ; 6 

43H, 44H, 48H, 50H, 60H > 7 
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11ED 36494949 DB 36H.. 49H, 49H, 49H, 36H 

11F1 36 

11F2 32494949 DB 32H, 49H, 49H, 49H, .SEH 

11F6 3E 

11F7 12888080 DB 12H, S0H, 80H, 80H, 80H 

11FB 80 

HFC 13808080 DB 13H, 80H, 80H, 80H, 80H 

1200 80 

1201 08142241 DB 08H, 14H, 22H, 41H, 41H 

1205 41 

1206 14141480 DB 14H, 14H, 14H.. 80H, 80H 
120A 80 

120B 41412214 DB 41H, 41H, 22H, 14H, 08H 

120F 08 

1210 20404548 DB 20H, 40H, 45H, 48H, j:0H 

1214 30 

1215 7F404F41 DB 7FH, 40H, 4FH.. 41H, 7FH 
1219 7F 



l? 



121A 7F484848 DB 7FH, 48H, 48H, 48H, 7FH ; M 

121E 7F 

121F 7F494949 DB 7FH, 49H, 49H, 49H, 36H > B 

223 36 
1224 7F414141 DB 7FH, 41H, 41H, 41H, 41H ; C 

1229 7F414141 DB 7FH, 41H, 41H, 41H, 3EH ; D 

122D 3E 

122E 7F494949 DB 7FH, 49H, 49H, 49H, 41H ; E 

1232 41 

1233 7F484848 DB 7FH, 48H, 48H, 48H, 40H > F 

1237 40 

1238 7F414149 DB 7FH, 41H.. 41H, 49H, 4FH i G 

123C 4F 

123D 7F080808 DB 7FH, 08H, 08H, 08H, 7FH i H 

1241 7F 

1242 417F4180 DB 41H, 7FH, 41H, 80H, 80H i I 

1246 80 

1247 03010101 DB 93H, 01H, 01H, 01H, 7FH ; J 
124B 7F 

124C 7F081422 DB 7FH, 08H, 14H, 22H, 41H > K 

1250 41 

1251 7F010101 DB 7FH, 01H, 01H, 01H, 01H :■ L 

1255 01 

1256 7F201020 DB 7FH, 20H, 10H, 20H, 7FH i M 

125A 7F 

125B 7F300806 DB 7FH, 30H, 08H, 06H, 7FH ; N 

125F 7F 

?60 7F414141 DB 7FH, 41H, 41H, 41H, 7FH ; 

264 7F 

1265 7F484848 DB 7FH, 48H, 48H, 48H, 78H J P 

1269 78 
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126A 


7F414543 


DB 


126E 


7F 




126F 


7F484C4A 


DB 


1273 


79 




1274 


32494949 


DB 


1278 


26 




1279 


40407F40 


DB 


127D 


40 




127E 


7F010101 


DB 


1282 


7F 




1283 


700C030C 


DB 


1287 


70 




1288 


7F020402 


DB 


128C 


7F 




128D 


63140814 


DB 


1291 


63 




1292 


60100F10 


DB 


1296 


60 




1297 


43454951 


DB 


129B 


61 





7FH, 41H, 45H, 43H, 7FH ; Q 

7FH, 48H, 4CH, 4AH, 79H .: R 

32H, 49H, 49H, 49H, 26H .; S 

40H, 40H, 7FK. 40H, 40H > T 

7FH, 01H, 01H, 01H, 7FH .; U 

70H, 0CH, 03H, 0CH, 70H .i V 

7FH, 02H, 04H, 02H.. 7FH ; W 

63H, 14H, 08H, 14H, 63H .! X 

60H, 10H, 0FH, 10H, 60H .; V 

43H, 45H, 49H, 51H, 61H .; Z 



THE FOLLOWING SUBROUTINES ARE SUBSTITUTE; 
FOR MONITOR ROUTINES. NORMALLY THE 
CORRESPONDING ROUTINES IN MONITOR 2 1 
WOULD BE USED. 

OUTPUT A CHARACTER TO THE LIST DEVICE 



129C 3E02 LO: MVI A.. 2 

129E D30A LOl: OUT 9AH 

12A0 DB01 L02: IN 1 

12 A2 E604 AN I 4 

12A4 C2A012 JNZ L02 

12A7 78 MOV A, B 

12A8 EEFF XRI OFFH 

12AA D308 OUT 8 

12AC AF XRA A 

12AD D30A OUT OAH 

12AF C9 RET 



OUTPUT A CHARACTER TO THE PUNCH 



12B0 3E01 PO: MVI A, 1 
12B2 C39E12 JMP LOl 



INPUT A CHARACTER FROM THE CONSOLE 



JB5 DB01 CI : 
12B7 E601 
12B9 C2B512 



IN 


1 


AN I 


1 


JNZ 


CI 
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12BC DB00 
12BE EEFF 
12C0 C9 



12C1 2C 
12 C 2 C0 
12C3 24 
12C4 C9 



12C5 
12C7 
12C9 
12CB 

0000 



IN 

:*:ri 

RET 





0FFH 



INCREMENT H AND L REGISTERS 

INCHL: INR L 
RNZ 

H 



INR 
RNZ 
INR 
RET 



.; TEMPORARY STORAGE 



40 



BADR 


DS 


CADR 


DS 


GADR 


DS 


BUFF 


DS 




END 



.: BUFFER ADDR 
.; CHAR ADDR 
; GRAF ADDR 
i BUFFER 
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MICROCOMPUTER USER'S 

LIBRARY SUBMITTAL FORM n* .no. abi 2 



D 4004 D 4040 D 8008 H 8080 □ 3000 



(use additional sheets if necessaryl 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



Tape Labeler for MDS 



Responds to "O" command in MDS monitor and allows user to 
insert a label on a paper tape he or she may be generating. 



MDS-800, punch, and a PROM resident monitor 



See listing 



.CKTEXT FOR LABEL> , 



Text is punch in large character on paper tape 









Registers Modified: 
All 


Assembler/Compiler Used: 
MAC80 


RAM Required: 

Amount to store text 


Programmer: 

Matt Town send 


ROM Required: 

512 bytes 


Company: 


Maximum Subroutine Nesting Level: 

1 


Address: 






98-034C 
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i REF. NO. AB12 

J PROGRAM TITLE TAPE LABELER FOR MD: 



FEC0 
F80F 
FCA2 
FD3A 

3000 



jMDi MONITOR CALL ENTERED VIA THE "0" COMMAND THAT WILL 

; PROVIDE A LABEL FOR PAPER TAPES. REQUIRES A CHANGE IN 

J THE MONITOR'S "CTBL" TO SET THE "0" COMMAND JUMP ADDRRE 

;FROM AN ERROR CONDITION TO THE DATA 80F6. 

;THIS PROGRAM IS ENTERED FROM THE START ROUTINE IN THE 

} MONITOR.. WILL ACCEPT CHARACTERS, THEN, UPON RECEIVING 

i A <CR-LF> WILL PUNCH THE TITLE TO FTP. THIS PROGRAM 

J UTILIZES MDS SUBROUTINES TO DO THE DIRTV WORK SO I'LL 

> START BV DEFINING THEM 

LEAD EQU 6FEC0H ; LEADER PUNCH 

PUN EQU 0F89FH ; LISTER OUTPUT 

CI EQU 0FCA2H .; CONSOLE INPUT 

CO EQU 6FD3AH J CONSOLE OUTPUT 

ORG 3O00H 



J NITTY GRITTV STARTS HERE 



3000 


21FF3D 


3003 


1600 


3005 


CDA2FC 


3008 


4F 


3009 


CD3AFD 


300C 


FEOD 


300E 


CA1730 


3011 


14 


3012 


71 


3013 


2B 


3014 


C30530 


3017 


0EOA 


3019 


CD3AFD 


301C 


CDCOFE 


301F 


21FF3D 


3022 


1E0A 


3024 


4E 


3025 


CD3F30 


3028 


15 


3029 


CA3B30 


302C 


2B 


302D 


ID 


302E 


C22430 


3031 


0E0D 


3033 


CD0FF8 


3036 


1E0A 


3638 


C32430 



LABEL: LXI H, 3DFFH 
MVI D, 60H 

PCMD: CALL CI 
MOV C, A 
CALL CO 
CPI 0DH 
JZ BANN 
INR D 
MOV M, C 
DCX H 
•JMP PCMD 

BANN: MVI C, OAH 
CALL CO 
CALL LEAD 
LXI H, 3DFFH 
MVI E, OAH 

BAN1 : MOV C, M 

CALL BANP 
DCR D 
JZ EXT 
DCX H 
DCR E 
JNZ BAN1 
MVI C, ODH 
CALL PUN 
MVI E, OAH 
JMP BAN1 



i SET UP CHARACTER COUNTER 
; GO GET A CHARACTER 

;ECHO IT 

.i IS IT A CARR. RET? 

> Z=VES , GO PUNCH THE CHARS. 
; I NCR THE CHAR CNTR 

> SAVE THE CHAR IN C REG. 
; GO FOR MORE 

} LF TO CONSOLE 



i FETCH 1ST CHAR 

; PUNCH IT 

; DECR CHAR CNTR 

i NZ=GOT MORE CHARS 

; POINT TO MEM LOC 
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?03B CDC0FE 
;:03E C9 



EXT: CALL LEAD ; PUNCH TRAILER 

RET i BACK TO MONITOR 

PUNCHES AN ASCII CHARACTER AS A BIG ONE ON PAPER 
TAPE ALLOWING MDS TAPES TO BE NAMED. ENTERS WITH THE 
CHARACTER IN C REG. USES MDS PUNCH SUBROUTINE TO THE 

; TTV. 



203F 


E5 


2040 


D5 


2041 


05 


3042 


79 


3043 


E63F 


3045 


4F 


3046 


07 


3047 


07 


3048 


81 


3049 


216930 


304C 


D25O30 


304F 


24 


3050 


5F 


3051 


1600 


3053 


19 


3054 


0605 


3056 


4E 


3057 


CD0FF8 


305 A 


*2~" 


305B 


05 


305C 


C25630 


305F 


0E00 


3061 


CD0FF8 


3064 


CD0FF8 


3067 


CD0FF8 


306A 


CI 


306B 


Dl 


306C 


El 


306D 


C9 


306E 


FC121112 


3072 


FC 


3073 


FF 89 89 89 


3077 


76 


3078 


7E8181C9 


307C 


42 


307D 


FF818131 


3081 


7E 


3082 


FF898989 


3086 


81 


3087 


FFO90909 


308E 


01 


308C 


7E81B191 



BANP: PUSH H 
PUSH D 
PUSH B 
MOV A, C 
AN I 3FH 
MOV C, A 
RLC 
RLC 
ADD C 

LXI H, PTBL-5 
JNC BAN 
INR H 
BAN : MOV E.. A 

MVI D, 0OH 
DAD D 
MVI B, 05H 
PBAN : MOV C, M 
CALL PUN 
INK H 
DCR B 
,TNZ PBAN 
MVI C, ©OH 
CALL PUN 
CALL PUN 
CALL PUN 
POP B 
POP D 
POP H 
RET 
i BANNER PUNCH CHARACTER TABLE 
PTBL : DB 374Q, 220... 21Q, 22Q, 3740 

DB 3770, 2110, 2110, 211Gb 166Q 

DB 176Q, 201Q, 2010... 201, 102Q 

DB 377Q.. 201Q, 201Q, 201Q.. 176Q 

DB 377Q, 2110, 211Q, 211Q, 201Q 

DB 377Q, 110, 110, 110, 10 

DB 176Q, 2010, 261Q, 221Q, 162Q 



MULT BV FOUR 

MULT BV 5 

LOAD SRT LOC OF CHAR TBL 

I NCR HIGH M LOC 



SET H AND L TO TBL LOC 
SET UP TABLE CNTR 
FETCH TABLE CHAR 



Z=END OF PUNCH 
PUNCH 3 SPACES 



:. A 
;B 
j C 
jD 
; E 
.; F 
.; G 
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PAGE 



3090 


%' ii- 


3091 


FF080808 


3695 


FF 


3096 


00C9FFC9 


309R 


00 


309B 


4080C97F 


309F 


01 


30R0 


FF081C22 


30R4 


CI 


30R5 


FF808080 


30R9 


80 


30RR 


FF020402 


30RE 


FF 


30RF 


FF040820 


30B3 


FF 


30B4 


7E818181 


30B8 


7E 


30B9 


FF090909 


30BD 


06 


30BE 


7E8181R1 


30C2 


7E 


30C3 


FF091929 


30C7 


C6 


30C8 


86898989 


30CC 


71 


30CD 


0101FF01 


30D1 


01 


30D2 


7F808080 


30D6 


7F 


30D7 


1F6O8060 


30DB 


IF 


30DC 


FF402040 


3OE0 


FF 


30E1 


E31C081C 


30E5 


E3 


3 SEC 


0304F804 


30ER 


03 


30EB 


C1R19189 


30EF 


Pj"7 


30F0 


00FF8181 


30F4 


00 


30F5 


0304186S 


30F9 


80 


30FR 


008181FF 


30FE 


00 


30FF 


0402FF02 


3103 


04 


31.04 


2070R820 


31.08 


20 


31.09 


00000000 



DB 377Q.. 10Q, 10Q., 10Q., 377Q 

DB 0Q, 201, 377Q, 201, 0Q 

DB 100Q, 200Q, 291, 177Q, 1Q 

DB 377Q, 10Q, 34Q, 42Q, 301Q 

DB 377Q, 200Q, 200Q, 200Q, 200Q 

DB 377Q, 2Q, 4Q, 2Q, 377Q 

DB 3770, 40... 10Q, 40Q, 3770 

DB 1760, 201Q, 2010, 201Q, 176Q 

DB 377Q, 11Q, 11Q, 11Q, 6Q 

DB 176Q, 201Q, 201Q, 241Q, 176Q 

DB 377Q, 11Q, 31Q, 510, 306Q 

DB 206Q, 211Q, 211Q, 2110, 161Q 

DB 1Q, 1Q, 377Q, 1Q, 1Q 

DB 177Q, 200Q, 200Q, 200Q, 177Q 

DB 37Q, 140Q, 200Q, 140Q, 37Q 

DB 377Q, 100Q, 40Q, 100Q, 377Q 

DB 343Q, 34Q, 10Q, 340, 343Q 

DB 3Q, 4Q, 370Q, 4Q, 3Q 

DB 301Q, 241Q, 221Q, 2110, 207Q 

DB 0Q, 377Q, 2010, 261Q, 0Q 

DB 3Q, 4Q, 30Q, 140Q, 200Q 

DB 0Q, 2010, 201Q, 377Q, 0Q 

DB 4Q, 2Q, 377Q, 2Q, 4Q 

DB 40Q, 160Q, 250Q, 40Q, 40Q 

DB 0, 0, 0, 0, 



.; H 

.; I 

j J 

.; K 

j L 

.; M 
iN 

.: 

i P 

.: Q 

;R 

; S 

; T 

.; U 

; v 



LFT BRACKET 

RIGHT BRACKET 
UP ARROW 
LEFT ARROW 
BUMMER 
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1:1 0D SO 

;:10E 00DFDFO0 

1:112 00 

1:113 00070007 C'B 00, 7Q, 0Q, 7Q, 0Q 



DB 0Q.. 3370, 3370, 00, 00 - ; QUOTE 



_ _ , , ._. ,,_. j 4 ,-, _._,-,,-, H .4,-, . J+ 



!:117 00 

1:118 24FF24FF 

!:11C 24 

MID 8689FF89 DB 2060, 2110, 377Q.. 211Q.. 161U .: * 



DB 293Q.. 1430, 300, 3040, 3QSQ 



3121 71 

^±2^. i":3 

3127 609699A6 DB 1400, 226Q, 2310, 2460, 3400 J & 

312B EO 

312C 00000709 C'B 0, 0.' 7 j y.- 

~:13fi 00 

3131 003C4281 DB 0Q, 74Q, 1020, 2010, 0Q > < 

2-±"^.F, 0iZi 

3136 O081423C DB 00... 201Q, 1020, 740, 00 i > 

31 3 A 00 

313B 894AFF4A DB 2110, 1120, 3770, 1120, 2110 :■ * 

313F 89 

3140 08087E08 DB 100, 100, 1760, 100, 100 J + 

3144 08 

3145 B070000O OB 2600, 1600, 00, 00, WU •• i 

3149 00 

314A 08080808 DB 100, 100, 100, 100, 100 - ; " 

~:14E Pi:".' 

314F 6060O000 OB 1400, 1400, 00, 00, 00 - ; • 

3153 00 __,._- , rrx .-, a .-u 

3154 8O601804 OB 2000, 140W, SUU, 4U, SV. •• LEFT -.LH_.H 
3158 03 

":l=i c .' 7E818181 OB 1760, 2010, 2010, 2010, 17foU i 

315D 7E 

315E 0082FF80 DB 00, 2020, 3770, 200b!, WW •' 1 



3162 00 

3163 C2A19189 

3167 86 

3168 42898989 
316C 76 
316D 1F10FC10 

3171 10 

3172 4F898989 

3176 71 _„___, 

3177 7E898989 OB 1760, 2110, 2110, 211U, lbWU ■= b 

317B 70 _. 

317C C1211109 OB 3010, 410, 210, llu, .-W it 



DB 3020, 2410, 2210, 2110, 2060 ; 2 

DB 1020, 2110, 2110, 2110, 1660 ■• 3 

DB 370, 200, 3740, 200, 200 •= 4 

DB 1170, 2110, 2110, 2110, 1610 > 5 



DB 1660, 2110, 2110, 2110, 1660 



3180 07 

3181 76898989 
~:1F:5 76 

3186 46898939 DB 1060, 2110, 2110, 2110, 176G 
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318M 7E 

31 SB A6R60000 

318F 00 

3190 B6760000 

3194 00 

3195 08102442 
3199 41 

319R 24242424 

319E 24 

319F 81422410 

31R3 08 

31H4 02B90909 

31R8 06 

0000 



DB 24SQ, 246Q.. 0Q, 0Q.. 0Q 

DB 266Q.J 1SSQ, 0Q.. 0Q.. 0Q 

DB 10Q, 20Q, 44Q, 102Q, 101Q 

DB 44Q.. 44Q, 44Q.. 44Q.. 44Q 

DB 201Q.. 102Q.. 44Q.. 20Q.. 10Q 

DB 2Q, 271Q, 11Q, 11Q., 6Q 



END 
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Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref - N ° 

D4004 D4040 8008 DtUOSO 



AB13 



Program 
Title 

Function 



(um additional sheets if necessary) 



Page listing program 

Provide facility for listing information in a pagenated, numbered 
format. This is accomplished thru the system software with the 
console printer; 



8080 Development System, Console device. 



Monitor (Ver 2.0), tape to be listed. 



The desired heading is typed on the console. (First page foot, then 
mark, then actual heading. Rubout echoes and deletes previous character, 
control T is horizontal tab, type page #1 followed by a control 'P'. 
Include spaces for necessary decimal carry digits. A control 'D' ter- 
minates entry. Then the reader device supplies the body text. Finish 
by typing 'LC until bottom of last page is marked by an extra heading. 



The desired formated listing is obtained. 



Registers Modified: 


Assembler/Compiler Used: 

8080 Resident Assembler 


RAM Required: 

CDH Bytes 


Programmer: 

Michael Christian 


ROM Required: 

Monitor I/O Routines 


Company: 

ARION CORPORATION 


Maximum Subroutine Nesting Level: 

Three levels 


vfflS' Boone Avenue North 
Minneapolis, MN 55427 
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i REF NO. AB13 

J PROGRAM NAME LISTING PROGRAM 



LINKAGE ADDRESSES 



3806 
3809 

000D 
000A 

007F 



CI 

RI 

CO 

.; ASCII 

CR 

LF 

RUBOUT 



EQU 3803H 

EQU 3806H 

EQU 2809H 
CONSTANTS : 

EQU 0DH 

EQU OAH 

EQU 7FH 



MAIN PROGRAM: 



0040 
0040 ( 

-00 



CJ2702 



ORG 
JMP 

ORG 



40H 
THEAD 

200H 



RE-ENTRY POINT, OR TO 
RE-ENTRY POINT, OR TO 
USE DEFALT HEADING. 



NORMAL ENTRV POINT OF PROGRAM: 



0200 


219E02 


BEGIN: 


LXI 


H, MHEAD 


0203 


CD40£i2 




CALL 


PRINT -, 


0206 


21C102 




LXI 


H, HEAD 


0209 


1600 




MVI 


D, 


020B 


CD0338 


BO: 


CALL 


CI 


02OE 


E67F 




AN I 


RUBOUT .; 


0210 


FE04 




CPI 


" D •" — •'' i? ■'' .; 


0212 


CA2302 




JZ 


Bl '; 


0215 


FE7F 




CPI 


RUBOUT 


0217 


CA9002 




■JZ 


RUB .; 


021A 


23 




I NX 


H 


021B 






MOV 


M, A .; 


021C 


CD6502 




CALL 


PRT i 


021F 


14 




INR 


D 


0220 


C30B02 




JMP 


BO 


0223 


21C102 


Bl: 


LXI 


H, HEAD 


0226 


72 




MOV 


M, D 


0227 


0642 


THEAD : 


MVI 


B, 66 ; 


0229 


21C102 




LXI 


H, HEAD 


022C 


CD4002 




CALL 


PRINT 


022F 


CD0638 


READ : 


CALL 


RI 


iScL 


DA2F02 




JC 


READ .; 


235 


E67F 




AN I 


RUBOUT .; 


0237 


CD6502 


SEND : 


CALL 


PRT .; 


023A 


DA2702 




•JC 


THEAD .; 



PRINT HEADING MESSAGE 



TO REMOVE PAR I TV BIT 
CONTROL D = FINISHED 
IF HEADING COMPLETE 

DELETE LAST CHARACTOR TYPED 

SAVE CHARACTOR 
ECHO CHARACTOR 



SAVE HEADING LENGTH 
SET # OF LINES/PAGE 



IF NOT RECEIVED, TRY AGAIN 

REMOVE PARITY BIT 

PRINT BODY CHARACTOR 

IF PAGE FULL, PRINT HEADING 
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02-£D C32F02 



0240 56 

0241 23 

0242 7E 

0243 CD6502 

0246 E5 

0247 FE10 
0249 CC5202 
024C El 
024D 15 
024E C24102 
0251 C9 



0252 


2B 


0253 


3E56 


255 


BE 


0256 


C25B02 


0259 


3630 


025B 


34 


025C 


3E39 


025E 


BE 


025F 


F0 


0260 


3630 


0262 


C35202 



0265 
026? 
0268 
026B 
026C 
026E 
0271 
0273 
0275 
0278 
"~:79 
27A 
02 7B 
027D 



FE09 

4F 

CD0938 

79 

FE0D 

C27302 

1E00 

FE0A 
C27B02 
05 
<7 
C8 

FE20 
FA8102 



JMP 
SUBROUTINE: 



READ 



.; PRINT MESSAGE, STARTING AT <HL." 

PRINT. MOV D, M 



PRO 



I NX 

MOV 

CALL 

PUSH 

CPI 

CZ 

POP 

DCR 

JNZ 

RET 



H 

A, M 

PRT 

H 

•■■p._-,B- 

INCPN 
H 
D 
PRO 



FIRST BYTE IS LENGTH: 

PRINT CHARACTOR 

CONTROL -P-'= INCREMENT PAGE # 

IF NOT FINISHED 



INCREMENT ASCII NUMBER STORE IN STRING 
IMMEDIATELY PRECEDING <HL> ADDRESS. 



INCPN 



DCX 

MVI 

CMP 

JNZ 

MVI 

INR 

MVI 

CMP 

RP 

MVI 

.JMP 



H 

A, " -' 

M 

$+5 

M, -'0- 

M 

A, "3" 

M 

M, -'0" 
INCPN 



SUBSITIUTE FOR LEADING BLANK 



TEST FOR CARRY 
IF ALL DONE 



TO PROCESS CARRY 



PRINT CHARACTOR RECEIVED IN <fl> : 
IF ^CONTROL I>. EXECUTE HORIZONTAL TAB. 
IF <CR>, ALSO RESET TAB COLUMN COUNTER <E>. 
IF <LF>, ALSO DECREMENT LINS COUNTER (B), 
RETURNING CARRY SET IF -'BOTTOM OF PAGE 



PRT 



CPI 

MOV 

CALL 

MOV 

CPI 

JNZ 

MVI 

CPI 

JNZ 

DCR 

STC 

RZ 

CPI 

JM 



- i •■--■ @- 

C, A 

CO 

A, C 

CR 

$+5 

E, 

LF 

■$+& 

B 



*+4 



CONTROL ' T'= HORIZONTAL TAB 



RESET COLUMN COUNTER 

ONE LINE PRINTED 

IF BOTTOM OF PAGE 

IF NON-PRINTING CHARACTOR 
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0280 


1C 




INR 


E 


0281 


A? 




ANA 


A 


0282 


C9 




RET 




0283 


0E20 


TAB: 


MVI 


c, - 


0285 


CD0938 




CALL 


CO 


0288 


1C 




INR 


E 


0289 


3E07 




MVI 


A, 7 


028B 


A3 




ANA 


E 


028C 


C28302 




JNZ 


TAB 


028F 


C9 




RET 




0290 


?A 


RUB: 


MOV 


A, D 


0291 


A7 




ANA 


A 


0292 


CA0B02 




JZ 


B0 


0295 


7E 




MOV 


A, M 


0296 


CD6502 




CALL 


PRT 


0299 


15 




DCR 


D 


029A 


2B 




DCX 


H 


029B 


C30B02 




•IMP 


B0 






; MESSAGES : 




"29E 


220D0A54 


MHEAD : 


DB 


LI, < 


tf2A2 


59504520 








02A6 


50414745 








02AA 


20484541 








02AE 


44494E47 








02B2 


3A 









i TO COUNT COLUMN PRINTED 
i CLEAR CARRV 



; IF NOT DONE 

■> IF NUL STRING 

i ECHO CHARACTOR REMOVED 

; GET NEXT CHARACTOR 



LI, CR, LF, 'TYPE PAGE HEADING:'' 



02B3 0D0A3C42 
02B7 4F445920 
02BB 454E443E 
02BF OD0A 



DB 



CR, LF, -'-CBGDV END>', CR, LF 



0022 



LI 



02C1 0A0A0A0A HEAD; 
02C5 0A 

02C6 2E0D0A0A 
"2CA OAOA 



000A 
0000 



L2 



EQU 
DB 

DB 



EQU 

END 



*-MHEAD-l 

L2, LF, LF, LF, LF, .: < DEFALT HEAD I NG» 

•". -,CR, LF, LF, LF, LF 

*-HEAD-l 
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MICROCOMPUTER USERS 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB14 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 D 8008 Q 8080 



(use additional sheets if necessary) 



SOURCE PAPER TAPE TO MAGNETIC CASSETTE 

Will copy a source paper tape onto a magnetic cassette. End statement 
must be followed by a carriage return. Program will Ignore leading 
blanks. 



TI Silent 700 Terminal connected in place of TTY. 



Supplied with Silent 700 terminal. Also see User's Library program 
Ref. No. AC8 



None 



Paper tape copied on magnetic cassette A X off character follows the end 
statement. 



Registers Modified: 

None 



RAM Required: 



157 dpMmal 



ROM Required: 

None 






Maximum Subroutine Nesting Level:' 

8 bytes 



Assembler/Compiler Used: 

8080 Macro Ver 3.0 



Programmer: 

John H. Brandt 



Company: 

E-Systems, Inc. 



Address: Box 1Q ^ ^ Dept< ^ 221 

Greenville, Texas 75^01 
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.; REF NO AB14. 
; PROGRAM NAME 



SOURCE PAPER TAPE TO MAGNETIC CASSETTE 



SOURCE PAPER TAPE TO MAGNETIC CASSETTE 
END STATEMENT IS FOLLOWING BV XOFF 
PROGRAM IGNORES LEADING BLANKS 



3806 


RI 


EQU 


3806H 


3763 


TO 


EQU 


3763H 


0013 


XOFF 


EQU 


13H 


000D 


CR 


EQU 


6DH 


0044 


DD 


EQU 


44H 


0045 


EE 


EQU 


45H 


0S4E 


N 


EQU 


4EH 


0020 


SPA 


EQU 


2@H 


3D25 


DELAY 


EQU 


3D25H 


"100 




ORG 


100H 


J100 2E00 




MVI 


L, O0H 


0102 1600 




MVI 


D, ©OH 


0104 62 




MOV 


H.. D 


O105 CD0638 


START : 


CALL 


RI 


0108 DA05O1 




JC 


START 


01OB 4F 




MOV 


C, A 


010C 7 A 




MOV 


A, D 


010D FE01 




CPI 


01H 


010F C21A01 




■JNZ 


COMCK 


9112 79 




MOV 


A, C 


0113 FEOD 




CPI 


CR 


0115 C26D01 




JNZ 


TAPE 


0118 1600 




MVI 


D.. 0OH 


011A 79 


COMCK : 


MOV 


A, C 


011B FE3B 




CPI 


3BH 


011D CR5B01 




JZ 


FLSET 


0120 7C 




MOV 


A, H 


0121 FE01 




CPI 


01H 


0123 C26001 




•JNZ 


SPCK 


0126 79 




MOV 


A.. C 


0127 FEOD 




CPI 


CR 


0129 CA6B01 




JZ 


SPEL 


012C FE45 




CPI 


EE 


012E C26D01 




JNZ 


TAPE 


0131 CD6337 




CALL 


TO 


134 CD0638 




CALL 


RI 


0137 4F 




MOV 


C, A 


0138 FE4E 




CPI 


N 



i READER ENTRV POINT 

i TAPE OUTPUT ENTRV POINT 



i DELAV ENTRV POINT 



COMMENT DELIMITER 
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013A C26D01 


.JNZ 


TAPE 


013D CD6337 


CALL 


TO 


0140 CD0638 


CALL 


RI 


0143 4F 


MOV 


C, A 


0144 FE44 


CPI 


DD 


0146 C26D01 


JNZ 


TAPE 


0149 CD6337 


CALL 


TO 


014C CD0633 


CALL 


RI 


014F 4F 


MOV 


C, A 


0150 FE0D 


CPI 


CR 


0152 C26DS1 


JNZ 


TAPE 


0155 0E13 


MVI 


C, XOFF 


0157 CD6337 


CALL 


TO 


015A 76 


HLT 




015B 1601 FLSET: 


MVI 


D, 01H 


015D C36D01 


JMP 


TAPE 


0160 79 SPCK: 


MOV 


A, C 


0161 FE20 


CPI 


SPA 


0163 C26D01 


JNZ 


TAPE 


0166 2601 


MVI 


H, 01H 


0168 C36D01 


JMP 


TAPE 


L6B 2600 SPEL: 


MVI 


H, 0©H 


iil6D 79 TAPE: 


MOV 


A, C 


016E FE0D 


CPI 


CR 


0170 CA7A01 


JZ 


RESET 


0173 2C 


I HP. 


L 


0174 CD6337 


CALL 


TO 


0177 C3O501 


JMP 


START 


017A 7D RESET: 


MOV 


A, L 


017B D619 


SUI 


25D 


017D FA8801 


JM 


DELV 


0180 2E00 


MVI 


L, OOH 


0182 CD6337 


CALL 


TO 


0185 C30501 


JMP 


START 


0188 2F DELY: 


CMA 




0189 C601 


AD I 


OIH 


018B 2E0D 


MVI 


L, ODH 


018D CD253D 


CALL 


DELAY 


0190 2D 


DCR 


L 


0191 C28D01 


JNZ 


*-4 


0194 3D 


DCR 


A 


0195 C28B01 


JNZ 


DELY+: 


0198 2E00 


MVI 


L, OOH 


019A CD6337 


CALL 


TO 


019D C30501 


JMP 


START 


0000 


END 





.; CHECK FOR SHORT LINE 
;ADD DELAY 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB15 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D 4040 B 8008 □ 8080 



(use additional sheets if necessary) 



I Command (INSERT DATA in hexadecimal form from the TTY 
into RAM) 

This program loads hexadecimal code into sequential RAM 
locations beginning at the address specified. An upper 
address limit may also be specified, if desMred. It is 
useful for loading hex machine code directly into RAM for 
corrections, debugging, execution, or PROM programming. 



TTY (Intellec 8/Mod 8 configuration uses port 0, 1 and 8) 



INTELLEC 8/Mod 8 MONITOR, VERSION 2.1 

Modified by changing two bytes in the command brand table 
as follows: 
\ address 3885 H was 43 H change to BO.. 

address 3886 H was 3C H change to 3F„ 



SEE ATTACHMENT 



Registers Modified: 

A11:A,B,C,D,E,H,L 


Assembler/Compiler Used: 

INTELLEC 8/M0D8 


RAM Required: 

(03, 04, 05, 08, 09, OA, OB) plus 
bytes to be loaded by program 


Programmer: 

G. Bechthold 


ROM Required: 

(eq 3FB0 - 3FFF) 


Company: 

National Research Counci 
Radio and Electrical Eng. Div. 


Maximum Subroutine Nesting Level: 

3 levels 


Address: Montreal Road 
Ottawa, Ontario K1A 0R8 
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4-76 



ATTACHMENT Input Parameters 



FQRMAT I low address, high address CR (or ,) 
or I low address, CR (or ,) 

xxxx Csp) HH [spj HH (sp) HH (sp) .... 

Note: 1. A space (sp) may be substituted for the , 
when entering commands 

2. Parameters with underscore are printed 
by the I routine 

3. XXXX - is the address of the byte beginning 
each line (similar to the D command 
DISPLAY DATA) 

4. HH - two ASCII characters, entered via the 
TTY, converted to hexadecimal values and 
placed in a byte of memory 

5. The high address in the command may be 

used when loading RAM to prevent overwriting 
data above that address. If it is emitted 
data may be written from the low address 
to the top of available RAM. Entry in 
either mode may be terminated by typing 
CR or (sp) 
or , 

Error Conditions 

1. If the low address or high address is 
greater than 16 bits, only the last 4 
hex digits of the argument will be used 
as the address 

2. If the low address is greater than the 
high address, only one byte at the low 
address will be inserted. 

3. If the low address, high address or data 
contains an invalid character, or if the 
the high address is omitted and two 
delimiters (, or (sp) followed by , or 
(sp) or CR) do not follow the low address 
the monitor will immediately type * (CR)(1 C ) 
and await the next command. F 
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ATTACHMENT Output Results 



The hexadecimal address of the first memory location to be 
loaded is printed followed by a space. Two hexadecimal char- 
acters may then be typed and will be loaded into a single byte 
of memory, followed by an automatic space. This procedure con- 
tinues, loading successive memory addresses, until a maximum 
of 16 bytes have been loaded. An automatic CR, LF, and the 
address of the first byte of this new line will then be printed 
All lines are blocked into integral multiples of 16, as in the 
Display Data command, so the first and last lines may be less 
than 16 bytes in order to synchronize the display. Data entry 
continues until a CR is typed, the high address (if specified 
following the I command) is loaded, or the top address of avial 
able RAM is reached. The Insert operation is then terminated 
and control returned to the monitor. 
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3FB0 




3FB0 


CD803D 


3FB3 


CDC73C 


3FB6 


CDCF3D 


3FB9 


AF 


3FBA 


92 


3FBB 


9B 


3FBC 


CAF33F 


3FBF 


CDFB3D 


3FC2 


CD4B3C 


3FC5 


CD443F 


^C8 


CD533E 


^FCB 


DA433C 


3FCE 


07 


3FCF 


07 


3FD0 


07 


3FD1 


07 


3FD2 


4F 


3FD3 


CD443F 


3FD6 


CD533E 


3FD9 


DA433C 


3FDC 


Bl 


3FDD 


CDCF3D 


3FE0 


i'* r 


3FE1 


CDDD3D 


3FE4 


DA4438 


3FE7 


CD2F3F 


3FEA 


79 


3FEB 


E60F 


3FED 


C2C23F 


3FF0 


C3B33F 


3FF3 


CD3E3E 


3FF6 


210A00 


3FF9 


71 


3FFA 


2C 


3FFB 


i' i"' 


3FFC 


C3BS3F 


000 





i REF. NO. AB15. 
PROGRAM < INSERT DATA IN HEXADECIMAL FORM FROM THE TTV INTO RAM> 



INSERT DATA IN HEXADECIMAL FORM 
FROM THE TTV INTO RAM. 



INSRT: 



NXTBV 



JPLIM: 



ORG 

CALL 

CALL 

CALL 

XRA 

SUB 

SBB 

■JZ 

CALL 

CALL 

CALL 

CALL 

JC 

RLC 

RLC 

RLC 

RLC 

MOV 

CALL 

CALL 

•JC 

ORA 

CALL 

MOV 

CALL 

JC 

CALL 

MOV 

AN I 

JNZ 

•IMP 

CALL 

LXI 

MOV 

INR 

MOV 

IMP 

END 



3FB0H 

3D80H 

3CC7H 

3DCFH 

A 

D 

E 

UPLIM 

3DFBH 

3C4BH 

3F44H 

3E53H 

3C43H 



C, A 

3F44H 

3E53H 

3C43H 

C 

3DCFH 

M, A 

3DDDH 

3844H 

3F2FH 

A.. C 

0FH 

NXTBV 

INSRT+3 

3E3EH 

H, 000AH 

M, C 

L 

M, A 

INSRT+6 



EXP-ENTER ADDRESS LIMITS 

CR/LF 

GETAD-RETR I VE ADDRESS 

CHECK IF UPPER LIMIT 

OF ADDRESS =0 < ADDRESS 

NOT SPECIFIED!:' 

VES 

LADR-PRINT ADDRESS 

BLANK 

R I -READ IN 1ST. CHAR. 

NIBBLE-CONV. TO HEX, CHECK ILLE 

LER-PRINT + RET. TO MONITOR 



■ TEMP. STORE 1ST. CHAR. 
;RI-READ IN 2ND. CHAR. 
: NIBBLE-CONV. TO HEX, CHECK ILLE 
; LER-PRINT * RET. TO MONITOR 

: GETAD-RETR I VE ADDRESS 
STORE BVTE 

HILO-CHECK UPPER LIMIT 
VES. RET. TO MONITOR 
SAV IT-STORE ADDRESS 
CHECK FOR COMPLETION OF 
LINE CIS BVTES> 
GET NEXT TWO CHAR. 
NEW LINE. PRINT ADDRESS 
MEMCK-FIND UPPER LIM. RAM 
LOAD UPPER LIMIT 
LOCATIONS OF THE 
I PROGRAM 

PRINT ADDRESS & BEGIN 
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iny 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



MICROCOMPUTER 

LIBRARY SUBMITTAL FORM Ref No 



AA2 



D 4004 D 4040 D 8008 158080 



(use additional sheets if necessary) 



8080 RAM MEMORY TEST 

MEMORY TEST for Intellec/80 system 



Intellec/80 I/O board ! TTY data out P ut P°rt 00H) 

(TTY status input port 01H) 
(DISPLAY output port FFH) 



None 



TTY may be disabled (for long test periods) by typing 2 
successive keys (causing over-run error) and turning it off. 
Assembler Values "TOP" and "BOTTOM" define the limits of 
the RAM addresses under test (normally 0000H to 2000H). 

Four types of error messages can occur (if the TTY is enabled) 

1) Instead of 67H, 65H was written into address 1234H; 
-67-65-1234 (02H shown on front panel display) 

2) Instead of 67H, 65H was read from address 1234H; 
-67-67-1234 (02H shown on front panel display) 

3) Address 1234 not in RAM under test; 
X-55-FF-1234 (55H shown on front panel display) 

4) 31H was written into address 1234 while addressing another 
address in memory (i.e. "Cross-Write error") 
X-55-31-1234 (55H shown on front panel display) 

NOTE The error bit pattern will always be displayed. 



Registers Modified: 

ALL 



RAM Required: 

NONE (except RAM under t est) 
ROM Required: — 

256 Bytes (1 chip) 



Maximum Subroutine Nesting Level: 

No stack used 



Assembler/Compiler Used: 

MAC80 or Resident Assembler 



Programmer: 

B. Searle 



Company: 

Ministry of Transport (CANADA) 



Address: T.A.C.D., Floor 10-G 

Tower "C", Place De Ville 
OTTAWA. CANADA 

98-034B 

4-81 



iny 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref *>. 



AA3 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 )Q 8080 



Memory Diagnostic Program 



(use additional sheets if necessary) 



Writes test bytes in any range of memory and compares the written bit 
combination with what is read. Upon detection of a defective memory 
location, an error message is printed specifying the address, reference 
and actual values. 



TTY on Port + 1 



Intel lee 80 System Monitor 



Address range input from TTY-console: 

<low address>,<high address> <CR> 
Delimiter between values = ',' 

- Closing input parameters with CR 

- Parameters in HEX 



Error message if program finds a defective memory location: 

ADDR: REF: ACT: (TABLE TITLES) 

(ERROR MESSAGE) 



XXXX 



XX 



XX 



Registers Modified: 
All 



RAM Required: 

12H 



ROM Required: 
181H 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

Intel lee 80 Macro Assembler 



Programmer: 

P. Schneider/H.P. Teufer 



Company: 

Landis 6 Gyr AG 



Address: 

CH-6301 Zug 
Switzerland 



9R_no«o 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref No 



AB16 



Program 
Title 

Function 



Required 



Required 
Software 



Input 
Parameters 



Output 
Result* 



D4004 D4040 O 8006 ffl 8080 



(use additional sheets if necessary) 



Compare Object Code Tape with Memory 

This program extends the Intel! ec 8 System Monitor's 'Compare" 
command to check the data from a hex format tape against the 
current information stored in memory. 



Intellect 8/80 Development System or equivalent (with tape reader) 



8080 Monitor, Version 2.0 (for other versions, linkage addresses 
must be corrected) 



To compare Prom, type "C(address)(CR)" (no change) 

To compare a tape, ready the tape and type "C(CR)" (omitting 
the memory address, as the address is specified by the hex 
format tape.) 



If all data checks, control is passed back to the Monitor's 
command loop. If a mismatch is found, it is reported in the 
following format: (Mem address) (Mem contents) (Compare data) 

Also strings of mismatches are separated by a blank in the 
'Compare tape' routine only. 



Registers Modified: 
All 



RAM Required: 

None 



ROM Required : 

90H 



Maximum Subroutine Netting Level: 

(not significant) 



Assembler/Compiler Used: 

8080 Macro Assembler 



Programmer: 

Michael Christian 



Company: 

Arion Corporati on 



Address 



825 Boone Avenue North 
Minneapolis, MN 55427 



98-0306 
4-85 
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; REF NO. AB16. 

i PROGRAM NAME COMPAR OBJECT CODE TAPE WITH MEMORY 



COMPARE OBJECT CODE TAPE WITH MEMORY 
8/20/75 

THIS PROGRAM EXTEND THE MONITOR " iTiMPARE " 
COMMAND TO CHECK THE DATA FROM A HEX FORMAT 
OBJECT CODE TAPE AGAINST THE CURRENT INFORMATION 
STORED IN MEMORY.. AND REPORTS ANY MISMATCHES 
FOUND. 

> TO COMPARE A PROM, TYPE "C<ADDRESSXCR>". 

> TO COMPARE A TAPE, LOAD THE TAPE TO BE~ COMPARED- 

AND TYPE "C<CR>" < OMITTING THE ADDRESS). 

THE FORMAT OF ANY MISMATCHES FOUND' IS: 
<MEM ADDRESS> <MEM CONTENTS;- <COMPARE DATA> 

MONITOR CVER 2. @> ADDRESSES REFERENCED - 



395A 


COMP 


EQU 


395AH 


3F6E 


TI 


EQU 


3F6EH 


3E11 


NIBBLE 


EQU 


3E11H 


3D71 


EX1 


EQU 


3D71H 


000D 


CR 


EQU 


0DH 


3C3E 


LER 


EQU 


3C3EH 


3EA0 


RI 


EQU 


3EA0H 


3C7D 


BYTE 


EQU 


3C7DH 


3CC3 


CRLF 


EQIJ 


3CC8H 


3DBA 


LADR 


EQU 


3DBAH 


3DC2 


LBYTE 


EQU 


3DC2H 


3C4E 


BLK 


EQIJ 


3C4EH 


3C50 


CO 


EQU 


3C50H 


386B 


START 


EQU 


386BH 



i ENTRY POINT - FIND OUT IF COMPARE IS WITH 
i PROM OR WITH TAPE. 



400 

3400 OD 



COMPARE : 



ORG 34O0H t OR ANY AVAILABLE ROM ADDRESS 
DCR C i GET ONE PARAMETER 
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£461 215E39 

14QA E3 

<4S5 210060 

5403 CD6E3F 

MOB 47 

]:40C CD113E 

Z:40F D2713D 

5412 Dl 
3:413 78 
3:414 FE0D 
3:416 C23E3C 



3-419 E5 
341A CDA03E 
341D DA3E3C 
•420 063A 
J422 90 
3423 C21A34 

3426 57 

3427 CD7D3C 
342A CA7B34 
342D 5F 
342E CD7D3C 

3431 F5 

3432 CD7D3C 

3435 El 

3436 6F 

3437 CD7D3C 

343A CD7D3C 
343D BE 
343E CA6Q34 

3441 F5 

3442 CDC83C 
3445 CDBA3D 
3448 CD4E3C 
344B 7E 
344C CDC23D 
344F CD4E3C 

3452 Fl 

3453 CDC23D 
456 E3 

3457 23 

3458 3E80 



LXI 

PUSH 

LXI 

CALL 

MOV 

CALL 

JNC 

POP 
MOV 
CPI 
JNZ 



H, COMP+4 

H " ; 

H, 

TI } 

B, A 

NIBBLE 

EX1.; 7 

D 

A, B 
CR 
LER 



SET UP RETURN ADDRESS FROM EXPR 

GET FIRST CHARACTOR 
SAVE TO TEST AS DELIMITER 

IF HEX DIGIT, REJOIN EXPR CODE 

BUMP DUMMV RETURN ADDRESS 



.iNOT VALID DELIMITER, ERROR 

READ HEX TAPE - GET NEXT BVTE AND TEST MEMORY ADDRESS 
SPECIFIED IN RECORD. REPORT MISMATCH, IF FOUND. 



REDO 



RED1 



PUSH 

CALL 

JC 

MVI 

SUB 

JNZ 

MOV 

CALL 

JZ 

MOV 

CALL 

PUSH 

CALL 

POP 

MOV 

CALL 

CALL 

CMP 

JZ 

PUSH 

CALL 

CALL 

CALL 

MOV 

CALL 

CALL 

POP 

CALL 

XTHL 

I NX 

MVI 



H 

RI 

LER 

B, ' : ■' 

B 

REDO 

D, A 
BVTE 
FINISH 

E, A 
BVTE 
PSW 
BVTE 
H 

L, A 
BVTE 

BVTE 

M 

MATCH 

PSW 

CRLF 

LADR 

BLK 

A, M 

LBYTE 

BLK 

PSW 

LBVTE 

H 

A, 8QH 



RESET MISMATCH FLAG & ZERO COUNTER 
IF END OF TAPE, ERROR 

LOOP UNTIL START OF RECORD 
ZERO CHECKSUM 

ZERO RECORD LENGTH, ALL DONE 

GET MSB OF ADDRESS 

GET LSB OF ADDRESS 

SET UP STARTING ADDRESS IN HL 
RECORD TYPE 

GET DATA 

IF GOOD DATA, SKIP REPORT 

PRINT ADDRESS OF MISMATCH 

PRINT STORED DATA 



PRINT READ DATA 
GET COUNTER AND FLAG 
COUNT ONE MISMATCH 
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245A B4 
345B 67 
345C E3 
345D C36B34 



ORA 
MOV 
XTHL 
JMP 



H 
H, A 



SET MISMATCH FLAG 
NEXT 

i UPDATE POINTER AND TEST IF END OF ONE RECORD. 

i GET COUNTER AND FLAG 

■> MARK END OF MISMATCH STRING 



CLEAR FLAG 

POINT TO NEXT MEMORV LOCATION 

ONE RECORD READ 

IF NOT DONE, GET NEXT BVTE 

GET CHECKSUM 

IF OK, GET NEXT RECORD 



3460 E3 


MATCH : 


XTHL 




2461 7C 




MOV 


A, H 


3462 B7 




ORA 


A 


2463 FCC83C 




CM 


CRLF 


3466 3E7F 




MVI 


A, 7FH 


3468 A4 




ANA 


H 


3469 67 




MOV 


H, A 


246A E2 




XTHL 




246B 23 


NEXT : 


I NX 


H 


346C ID 




DCR 


E 


346D C23A34 




JNZ 


RED1 


2479 CD7D2C 




CALL 


BVTE 


~473 CA1A34 




JZ 


REDO 


3476 OE2A 




MVI 


C, '*" 


3478 CD503C 




CALL 


CO 


347B CD4E3C 


FINISH: 


CALL 


BLK 


347E 2B 




DCX 


H 


347F CDBA3D 




CALL 


LADR 


3482 CDC83C 




CALL 


CRLF 


3485 El 




POP 


H 


3486 3E7F 




MVI 


A, 7FH 


3438 A4 




ANA 


H 


2489 67 




MOV 


H, A 


248A CDBA2D 




CALL 


LADR 


248D C26B28 




JMP 


START 



FLAG CHECKSUM ERROR 



PRINT LAST ADDRESS CHECKED 



PRINT # OF MISMATCHES 
RETURN TO MONITOR 



; +* : +"+* + + + *+++++*+*+*#^^^ 



2896 

2896 0024 



ORG 



2S96H 

COMPARE .; MODIFY THE MONITOR'S COMMAND BRANCH 
i TABLE TO -JUMP TO NEW ROUTINE. 



0000 



END 



4-89 



Ref.# AB17 



inSJte [NTEV USERS L'BRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 #8008 D8080 D8048 D8085 □ Other. 



. (use additional sheets if necessary) 



K, PROGRAM TRAP 



This program provides two traps (search/wait) for debugging other 
programs which use RAM memory. Displays the contents of five 
registers and the trap address when the trap occurs. 



Intel lee 8 computer and TTY on Port 0. 



Monitor VER. 1.1 as the trap program is written. For Monitor 
VER. 2.1 change the trap program equates (See the attached sheet) 



See the attached sheet. 



See the attached sheet. 



Registers Modified: 
A, B, C, D, E, H, L 



RAM Required: 
10H to 1FH 



ROM Required: 
3100 to 323E 



Maximum Subroutine Nesting Level: 
3 



Assembler/Compiler Used: 
Intel lee Assembler Ver. 1.0 



Programmer: 

R. T. Ktrk 



Company: 
Kenway Incorporated (801)292-2401 



Address: 
525 W. 350 



City: 

N. Bountiful 



State: 

UTAH 84010 



Intel Corporation, 1976 



98-034D 

4-90 



; TITLE: K, PROGRAM TRAP 
; A PROGRAM BREAK POINT OR TRAP IS SET BY THIS PROGRAM. 
; FOLLOWING POWER ON START, TYPE G3230 GR TO INITIALIZE 
; THE TRAP PROGRAM. 

; THIS PROGRAM CAN ONLY BE USED BY RAM TYPE MEMORy. 
; TO SET A TRAP TYPE K FOLLOWED BY TRAP ADDRESS AND CR. 
i TO CLEAR ONE OR TWO TRAPS TYPE K FOLLOWED BY CR. 
; A MAXIMUM OF TWO TRAPS CAN BE SET. IF THE MAXIMUM IS 
; EXCEEDED TERR WILL BE PRINTED ON THE TTY. 
I WHEN A TRAP IS ENCOUNTERED THE CONTENTS OF THE A.,B,C 
J D^E REGISTERS ARE PRINTED FOLLOWED BY THE TRAP' 
i ADDRESS. THE FORMAT IS: AB CD E0 ADDRESS 

; THE TRAP IS CLEARED WHEN ENCOUNTERED. 
; A TRAP REQUIRES 3 MEMORY LOCATIONS. THEREFORE NEVER 
; ALLOW THE TRAP TO AFFECT AN ENTRY POINT. 
; EXAMPLE: A TRAP CANBE SET AT TR1 ; MOV A,M, DEC C OR 
'* JNZ TR10 BUT NOT AT TR2: MVI D,OFFH UNLESS 

> IT CANBE DETERMINED THAT PROGRM EXECUTION 

> WILL NEVER ARRIVE AT TR3 BEFORE THE TRAP. 
' IS ENCOUNTERED. 

* TR1 : MOV . A*M 

* DEC C 

* JNZ TR10 

' TR2; MVI D*0FFH 

' TR3: MVI E,0FFH 

; FOR MONITOR VER 1.1 CHANGE THE CONTENTS OF MEMORY 

LOCATIONS 3C2I AND 3C22 TO 3100 HEX. FOR MONITOR 
; VER 2.1 CHANGE THE CONTENTS OF MEMORY LOCATIONS 
S 3889 AND 388A TO 3100 HEX. 

I FOR MONITOR VERSION 2.1 CHANGE THE FOLLOWING EQUATES TO: 
; EXPR EQU 3D80H 
J INCHL EQU 3DEBH 
; START EQU 3 84 AH 
J TTY EQU 3C57H 
; VERO EQU 3835H 
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Ref.# AB18 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 [38080 Q8048 D8085 □ Other. 



. (use additional sheets if necessary) 



DEBUG - A two prom debugging package to be used in minimum 8080 systems. 
To inspect, dump, move and find data in memory. 



SEE WRITEUP 



Registers Modified: 

ALL 



RAM Required: Stack and one location 
above stack for flag 

ROM Required: 
2-1702 (512 location) 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
8080 Macrn Acc Q ^| cr 



© Intel Corporation. 1976 



Programmer: 
Tom Lafleur 



Company: 
Naval Electronics Lab Ctr. . 



Address: La Posta Observatory 
Route 1. Box 591 



City: 
Campo 



State: 
HA 97006 



(714) 775-7705 



98-0340 
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WRITEUP 



COMMAND SYNTAX 



Inspect Memory 
ADDR = XXXX 



Address to inspect 



(XXXX) 



DD 



XX 



Space bar to go to next location 

New data Ctwo hex charterl 

CTL 'A' COIH) will ask for new address 

Current Data 

Address 



Dump Memory in Hex 
D ADDR = XXXX , XXXX 



-Last location 
-First location 



Dump range 



Will display 16 memory locations per line. (XXXX) DD DD DD DD DD. 



Move Block of Memory 

M ADDR = XXXX , XXXX TO XXXX 



•New address of block 
Last address of block 
First address of block 



Find Byte 

£ ADDR = XXXX, XXXX , D=DD, N=DD 

tCar 
or 



riage return if no replacement 



rep I acement data 
Search data 

Last Address of search range 

First address of search range 

print out the address of all locations that 



This command wi I 
contain the search data. An option is also available that will 
replace the search data with a new data byte. 



GOTO 

G ADDR = XXXX 

' Jump address 
Will exit with interrupt on. 



4-96 



Notes: 



1. Under lined data is user entered. 

2. Dump and find routine allows for a return to the command loop by 
pressing any key on the TTY. 

3. All routine allows for exit by pressing ALT-MODE (7DN) or break 
(00H) key in response to any input, will respond with '?'. 



Options 

Commands are given for jumps to user-written high speed I/O devices. 
The commands are: 

R (Jump 3500H) Read hex 

W (Jump 3503H) Write hex routine 

E. (Jump 3506H) End f i le 

Output Results 

First time through debug will give an ID message; then will type out 

a ' ?' when it's ready for input. 
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Intel 



USER'S 
LIBRARY SUBMITTAL FORM **. no. aa4 



D 4004 D 4040 □ 8008 KJ 8080 



(mm additional sheets if necessary) 



Program 
Title 

Function 



Required 



Required 
Software 



Input 
Parameters 



PUNCH TEST or TTY READER/PUNCH TEST 

1) Tests paper tape punch (using High Speed or TTY Reader) 

2) Complete TTY READER/PUNCH TEST 



INTELLEC/80: I/O hoard for TTY output 



INTELLEC/80 monitor (or equivalent I/O drivers). 



None , 



Output 



TEST 
METHOD 



1) Binary count tape (& TTY listing if TTY punch is used) 

2) On errors, TTY prints actual & expected data hefore 
exiting to monitor 



Stop CPU and advance reader tape one character to simulate 
a character error. 



J 



Registers Modified: 

ALL 



RAM Required: 

(except stack) 



ROM Required: 

3P Hex 



Maximum Subroutine Nesting Level: 

about k 



Assembler/Compiler Used: 

Mac-80 resident or cross Assembler 



Programmer: 

B. Searle 



Company: 

Ministry of Transport (CANADA) 



Address: TACD , Tover C, Place de V.ll 
Ottava, Ontario, CANADA^ K1A 0JT8 



98-034C 
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RPTEST 
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REF. NO. AA4. 

PROGRAM NAME PUNCH TEST OR TTV READER/PUNCH TEST 



TITLE 



RPTEST 



************************************************** 
******************************************** !({J|e , M( , |{He 

TELETVPE READER/PUNCH TEST 



START TEST AT LOCATION 1000 <HEX>, THEN 
PUT PUNCHED LEADER IN READER & START 
READER WHILE BINARV COUNT IS PUNCHING 

IF ERROR OCCURS, THE ACTUAL CHARACTER 
READ IN AND THE EXPECTED CHARACTER ARE 
TVPED CUT. THE TEST PROGRAM THEN EXITS 
TO THE INTELLEC SO MONITOR 



AUTHOR: B. SEARLE 

MINISTRY OF TRANSPORT 
OTTAWA, CANADA 
(.613 > 936-0221 

DATE: JANUARV 30, 1375 

******************************************* 1+t ***. 4! ***^ % ^ 
******************************************* s|! ****^^^, Ms 



****** INTELLEC 8/80 MONITOR ENTRV POINTS, VERSION 1. 1 

J VERSION 2. ENTRV POINT 



3C30 
3CAD 
3DB0 
OC0 
_c6C 
3E34 
3800 



BLK 


EQU 


3C30H 


3CE4 


CRLF 


EQU 


3CADH 


3CC8 


LBVTE 


EQU 


3DB0H 


3DC2 


LEAD 


EQU 


3DC0H 


3DD2 


PO 


EQU 


3E6CH 


3E78 


RI 


EQU 


3E94H 


3EA0 


MONITR 


EQU 


3800H 


3800 
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0000 

00FF 
00FF 

3640 



3640 FB 

3641 CDAD3C 



****** "PUNCH" CONDITIONAL ASSEMBLY CONTROL 



FALSE 


EQU 


0000H 


TRUE 


EQU 


00FFH 


PUNCH 


EQU 


TRUE 



ORG 



3640H 



; ****** 

.» 

START : 



START UP 

EI 

CALL CRLF 



PRINT CR & LF 



3644 CDC03D 
364? 0EFF 
3649 CD6C3E 
364C 0E00 
364E CD6C3E 

3651 0C 

3652 C24E36 



3655 CD943E 

3658 3C 

3659 C25536 
365C 5F 



^ it* -t- •t* *T" t* **• 

j *t* H^ 5ft *T* f *f 

INITP: 



INIT1: 



IF PUNCH mm 

FIRST PUNCH LEADER, SVNC CHARACTER, AND 

ONE FULL BINARY COUNT PATTERN 



CALL LEAD 
MVI C, 00FFH 
CALL PO 
MVI C, 00H 
CALL PO 
INR C 
JNZ INIT1 
ENDIF mi m 



i PUNCH LEADER 

i PUNCH SVNC CHARACTER. 

; INITIALIZE PUNCH CHARA 

; PUNCH & INCREMENT CHAR 

; LOOP UNTIL FULL COUNT 



****** 
INITR: 



NOW INITIALIZE READER TAPE POSITION 



CALL RI 
INR A 
JNZ INITR 
MOV E, A 



READ UNTIL SVNC CHAR AC 
INITIALIZE COUNT PATTE 



****** TEST: READ TAPE & COMPARE TO COUNT PATTERN 
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365D CD943E 
366© 93 
3661 C46C36 

3664 4B 

3665 CD6C3E 

ji-6foo xC 
3669 C35D36 



TEST1 : 



366D CDB03D 
3670 CD303C 

3673 7B 

3674 CDB03D 
3677 CDAD3C 

367A C30938 



367D C34036 



CALL RI 
SUB E 
CNZ ERROR 
IF PUNCH ; 
MOV C, E 
CALL PO 
ENDIF ;; ;.; 
INR E 
JMP TEST1 



; READ NEXT CHARACTER 

; TEST AND BRANCH IF ERR 



i PUNCH CHARACTER 



.; LOOP TO NEXT CHARACTER 



ERROR : 



ERROR PRINT OF ACTUAL & EXPECTED CHARACTER 



ADD E 

CALL LBVTE 
CALL BLK 
MOV A, E 
CALL LBVTE 
CALL CRLF 
IF PUNCH :. i 
•JMP MONITR 
ENDIF .; ; ; ; .; 



JMP START 



RESTORE ACTUAL CHARACT 
PRINT ACTUAL CHARACTER 
PRINT BLANK 
PRINT EXPECTED CHARACT 

PRINT CR, LF 

EXITS TC MONITOR 

OR IF PRINT & PUNCH DE 
ARE DIFFERENT, COULD . 
RE-SVNC & CONTINUE TES 



0000 



END 
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LIBRARY SUBMITTAL FORM «*. «o. 



AA5 



D 4004 D 4040 D 8008 [3 8080 



(um additional sheets if necessary) 



Program 
Title 

Function 



READER TEST 

Tests High Speed paper tape reader or teletype reader. 



Required 



Required 
Software 



Input 



INTELLEC 8/80: 1/0 board for reader control, 

I/O board for TTY output. 



INTELLEC 8/80 monitor (or equivalent I/O drivers) 



Binary count tape (use a patched-up continuous loop for a 
continuous test). 



Output 
Remits 



TEST 
METHOD 



Actual reader data & expected data are typed out on TTY for 
any read error, and the input tape is re-synchronized 
Un case of dropped or extra characters). 



Stop CPU and advance reader tape one character to simulate 
a character error. «*j.a,o C 



L 



Register* Modified: 

ALL 



RAM Required: 

(except stack) 



ROM Required: 

25 Hex 






Maximum Subroutine Nesting Level: 

about k 



Assembler/Compiler Used; 

Mac-80 residen 

Assembler 



t or cross 



Programmer: 

R. Searle 



Company: 

Ministry of Transport (CANADA) 



Address: TACD, Tower C, Place de V- 
OTTAWA, ONTARIO, CANADA K1A ONI 



lie 



98-0348 
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REF. NO. AA5 

PROGRAM TITLE READER TEST 



TITLE ' RPTEST 



i ********************************************************* 
'***********************************^ J4!+!|c ^ !tt54t! , i!t!!(t++!tt:lcsf!:tt!|::t(!t!!t:+ 

i TELETVPE READER PUNCH TEST 

J 

i START TEST AT LOCATION 10OO CHEIO, THEN 

i PUT PUNCHED LEADER IN READER & ^TART 

i READER WHILE BINARV COUNT IS PUNCHING 

•> IF ERROR OCCURS, THE ACTUAL CHARACTER 

> READ IN AND THE EXPECTED CHARACTER ARE 

TVPED OUT. THE TEST PROGRAM THEN EXITS 
• : TO THE INTELLEC 80 MONITOR 



J AUTHOR: S. SEARLE 

' MINISTRY OF TRANSPORT 

■ : OTTAWA, CANADA 

' <6±S> 996-0221 

i DATE: JANUARV SO, 1975 

.i ********************************* s|cl|{ ******** + ** + * + ^^ ltt 
} **********************************************^^ s(f , |t , f!]tt 



.;****** INTELLEC 8/80 MONITOR ENTRV POINTS, VERSION 1.1 

; > VERSION 2. O ENTRY POINT 



3C30 
3C40 
3DB0 
3DC0 
194 
->£94 
3808 



BLK 


EQU 


3C30H 


; 3CE4 


CRLF 


EQU 


3C40H 


J 3CC8 


LBVTE 


EQU 


3DB0H 


■> 3DC2 


LEAD 


EQU 


3DCOH 


;3DD2 


PO 


EQU 


3E94H 


.; 3E78 


RI 


EQU 


3E94H 


i 3EA0 


MONITR 


EQU 


3800H 


; 3800 
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00 WW 
08FF 

0000 



****** "PUNCH" 


CONI1 


"IONAL A: 


FALSE 


EQU 


0000H 


TRUE 


EQU 


00FFH 


PUNCH 


EQU 


FALSE 



3600 



ORG 



3600H 



3600 FB 

3601 CD403C 



■ } ****** START UP 



JTART : 



EI 
CALL 



CRLF 



; PRINT CR & LF 



IF PUNCH ; .; ; .= :• i 
i ****** FIRST PUNCH LEADER, SYNC CHARACTER, AND 
; ****** ONE FULL BINARV COUNT PATTERN 



INITP 



INIT1 



CALL 

MVI 

CALL 

MVI 

CALL 

INR 

JNZ 

END IF 



LEAD 

C, OOFFH 

PO 

C, 00H 

PO 

C 

INIT1 

y * j j j * * 



■> PUNCH LEADER 

,- PUNCH SVNC CHARACTER 

.; INITIALIZE PUNCH CHARAC 
; PUNCH & INCREMENT CHARA 

.;LOOP UNTIL FULL COUNT P 



.:****** NOW INITIALIZE READER TAPE POST I ON 



3604 CD343E 


INITR: 


CALL 


RI 


3607 3C 




INR 


A 


3608 C20436 




JNZ 


INITR 


360B 5F 




MOV 


E, A 



jREAD UNTIL SVNC CHARACT 
i INITIALIZE COUNT PATTER 



****** TEST: READ TAPE & COMPARE TO COUNT PATTERN 
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360C CD943E 
360F 93 
3610 C41736 



TEST1 : 



26±S 1C 
3614 C30C36 



CALL 


RI 


SUB 


E 


CNZ 


ERROR 


IF 


PUNCH; ; } ; i :. 


MOV 


C, E 


CALL 


PO 


END IF 


* J •■.'.» J .' 


INR 


E 


JMP 


TEST1 



i READ NEXT CHARACTER 

i TEST AND BRANCH IF ERRO 



i PUNCH CHARACTER 



;LOOP TO NEXT CHARACTER 



; ****** ERROR PRINT OF ACTUAL & EXPECTED CHARACTER 



3617 83 

3618 CDB03D 
361B CD303C 
361E 7B 
361F CDB03D 
3622 CD403C 



ERROR : 



ADD 


E 




CALL 


LBVTE 




CALL 


BLK 




MOV 


A, E 




CALL 


LBVTE 




CALL 
IF 


CRLF 






.' j j > 


JMP 


MONITR 




END IF 


.• ■• :•.•.• j .• 





j:625 C30036 



JMP 



START 



i RESTORE ACTUAL CHARACTE 
.: PRINT ACTUAL CHARACTER 
.; PRINT BLANK 
; PRINT EXPECTED CHARACTE 

i PRINT CR, LF 

i EXITS TO MONITOR 

iOR IF PRINT & PUNCH DEV 
i ARE DIFFERENT, COULD .. 
.; RE-SYNC & CONTINUE TEST 



0000 



END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AC4 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 D 4040 D 8008 S 8080 D 3000 



(use additional sheets if necessary) 



TALLY R2050 HSPTR DRIVER 

Extension to the Intel 8080 monitor to handle a Tally model 
R2050 photoelectric tape reader at 200 cps. 



Intellec 8 Mod 80 

Tally model R2050 photoelectric tape reader 

Power supply for the reader 

Connecting cables 



Intel 8080 monitor 



None 



Data read is passed back to the monitor 



Registers Modified: 



Data in A 



all others, saved & restored 



RAM Required: 

None 



ROM Required: 

44 bytes 



Maximum Subroutine Nesting Level: 
2 



Assembler/Compiler Used: 

8080 Macro Assembler, V2.0 



Programmer: 

J.J. deZubeldia 



Company: 

IKASLAN S.A. 



Address: 



Barrio de Zabalondo 
MUNGUIA (Viz cay a) SPAIN 



98-034C 
4-108 
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i REF NO. AC4. 

..PROGRAM NAME TALLV R2050 HSPTR DRIVER 



, INTEL 8080 MONITOR VER. 1. 

i EXTENSION TO HANDLE A TALLV MODEL R 2S*5V\ 

i PHOTOELECTRIC TAPE READER AT 268 CPS 

i USING THE INTELLEC INPUT PORT #3 AS TAPE 

} READER DATA INPUT AND EIT #2 <0080A100> 

;ON OUTPUT PORT #1 AS TAPE ADVANCE 

; READER OUTPUTS INVERTED DATA, 

.< HANDLER RETURNS NON- INVERTED DATA IN A 



i JJZ 


16 


4. 75 




i VER. 


2. 


1 




DIPR 




EQU 


-, 


COPR 




EQU 


1 


CEIT 




EQU 


4 



' jms t'IPR EQU 3 .;DATA INPUT PORT 

0001 COPR EQU 1 ; COMMAND OUTPUT PORT 

0004 CBIT EQU 4 ; COMMAND BIT ON COPR 

3706 ORG 3736H i TABLE ENTRV FOR USER 

__ i SUPPLIED READER 

if 0b C31B37 JMP 371BH ; JUMP TO DRIVER 

271B ORG 371BH 

371B DB0^: in DIPR ; INPUT DATA 

f 71D 2F CMfl j COMPLEMENT DATA 

i71E B7 ora A ; CLEAR CARRV 

371F F5 PUSH PSW 

3728 AF XRfl A ; CLEAR ACCUMULATOR 

£7-£± D301 OUT COPR ; SEND A 100 MICROSEC 

- :72 - : ^D2F37 CALL DCMI .; ADVANCE PULSE Tfi 

i726 3E04 MVI A, CBIT .; THE READER THROUGH 

37k:a D301 OUT COPR .; PORT COPR 

372A CD3837 CALL DLVM ; 5 MSEC. DELAV 

i72D Fi POP psu 

372E C3 RET 



> 100 MICROSE. DELAV SUBROUTINE 
DCMI : 
DCM0 : 



72F 


F5 


730 


3E0C 


732 


3D 



PUSH 


PSW 


MVI 


A, 12 


DCR 


A 
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27 i6 


C2.s 
Fl 


d— - r 




JNZ 
POP 


DCM0 
PSW 


_i- f' J- 1' 


C3 




.' 


RET 










, 5 MIL 


.LI SEC. 


DELAY SUBROUTINE 


-.-7- ;= . 


F5 




DLVM : 


PUSH 


PSW 


273B 


3E2R 
CD2F27 


DLV0 . 


MVI 
CALL 


A, 42 
DCMI 


372E 
272F 
3742 
2742 


2D 
C2" 
Fl 
C9 


i:B37 




DCR 
■JNZ 
POP 
RET 


A 

DLV0 

PSW 


9000 






END 
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AC5 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 K) 8080 



(use additional sheets if necessary) 



Tally - allows Tally 2200 line printer to be used in the assembly stage 
of programming with Intel lee 80. 

Program first tests to see if the printer is ready. Then it checks the 
data in the output line to see if it is output or control data. If output 
it is sent to the Tally buffer until the buffer is full. With the control 
for line feed, null or buffer full, the line is printed. Page control 
is also given. 



One interface board connected to a Tally 2200 line printer. 1/0 ports 
connected to Jk J5 on second 1/0 board. (Full details in Figure 1 of 
attachment) 



Assembler and monitor 



Gate 7 Bit 
1 
2 

3 

k 

5 
6 



TEST = 1 when the printer is ready 

BUFB = 1 if hardware is still in use 

HDWB = 1 if hardware is still in use 

CRST = 1 when control signal has been received 

BUFF = 1 when buffer is full 

VFU1 = 1 when end of page is reached 

VFU2 = 1 for start of new page 



Gate 6 8-bit ASCII data 

Gate 7 Bit resets receive buffer 

1 SLEW = 1 to start paper feed 

2 CSCD = 1 to strobe data into Tally 

3 PCMD = 1 to start printing 



Registers Modified : 
A 



RAM Required: 





ROM Required: 

96 bytes (1 chip) 



Maximum Subroutine Nesting Level: 

1 



Assembler/Compiler Used: 

8080 MDS Macro Assembler Ver 1.0 



Programmer: 

Miguel Angel Ainsa/S. Pick 



Company: 

ITTLS - Standard Electrica 



Address: 



Avenida America KM7.2 
Madrid 27 SPAIN 



98-034B 
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AC£ 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D 4040 D 8008 Q 8080 



(use additional sheets if necessary) 



Model 101 Centronics Printer Handler 

Accepts character output for Model 101 Centronics printer from assembler 
or other source. Buffers print characters in RAM performing TTY com- 
patible operations with control characters. Causes line to be printed 
upon receipt of line feed. Counts lines and keeps track of pagination. 
Inserts title at top of each page. 



Model 101 Centronics printer with appropriate connectors and cable. 
Out Port 3 goes to data and strobe of Model 101, bits 0-6 are data 
and bit 7 is strobe. Input Port 1, bit 7 is ready status. 



No additional software required. 



C register to contain ASCII character to be printed. 



A,C register modified. All others preserved. 



Registers Modified: 
A t C 



RAM Required: 

I 110 16 



ROM Required: 

None 



Maximum Subroutine Nesting Level: 

3 + 8 hvl-PQ ttarl, ctnrajo 



Assembler/Compiler Used: 
8080 Macro Assembler 



Programmer: 

Riddft; 



Company: 
Data Test Corporat ion 



Address: 



2450 Whitman Road 

CnnrnrA Pa 



98-03*8 
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REF. NO. AC6 

PROGRAM TITLE MODEL 101 



CENTRONICS PRINTER HANDLER 



ASSEMBLER ORIENTED LINE PRINTER HANDLER 



3700 




ORG 


370OH 


3700 C39C3C 




JMP 


3C9CH 


3703 C33C37 




JMP 


ASVPRT 


3712 




ORG 


3712H 


3712 C33C37 




JMP 


ASVPRT 


3720 




ORG 


3720H 


3720 


LISTOUT 


ECU 


* 


3720 79 




MOV 


A, C 


3721 2F 




CMA 




3722 4F 




MOV 


C A 


3723 DB01 


STATLOOP : 


IN 


3725 E680 




AN I 


80H 


72.7 CA2337 




JZ 


STATLOOP 


372A 3E7F 




MVI 


A, 7FH 


372C Al 




ANA 


C 


372D D303 




OUT 


LPRT 


372F C680 




AD I 


80H 


3731 D303 




OUT 


LPRT 


3733 3E7F 




MVI 


A, 7FH 


3735 Al 




ANA 


C 


3736 D303 




OUT 


LPRT 


3738 79 




MOV 


A, C 


3739 2F 




CMA 




373A 4F 




MOV 


C, A 


373B C9 




RET 




0001 


STATUS 


EQU 


1 


0003 


LPRT 


EQU 


3 


373C 


ASVPRT 


EQU 


* 


373C 79 




MOV 


A. C 


373D 320536 




STA 


CHARSV 


3740 C5 




PUSH 


B 


3741 D5 




PUSH 


D 


3742 E5 




PUSH 


H 


3743 F5 




PUSH 


PSW 


3744 3A0436 


CKLC : 


LDA 


LINCNT 


^47 E6FF 




AN I 


0FFH 


^749 C26237 




JNZ 


CKCR 


374C 8E0C 




MVI 


C, OCH 


374E CD2837 




CALL 


LISTOUT 



i ABS JUMP VECTORS 

; COMMAND IN VECTOR TTV 

> COMMAND OUT VECTOR 

;LIST OUT VECTOR 



COMPLEMENT CHARACTER 



STATUS i GET STATUS FROM PRTR 

; LOOP TIL READV 
;MASK OF F CHARACTER 

> MARK CHAR OUT 
i STROVE CHAR OT 

.: MASK OFF CHAR 

; MARK CHAR OUT 

i RESTORE CHARACTER 



i ***EXIT 

i STATUS IN PORT 

;LINE PRT DATA OUT 



i SAVE ENVIFONMENT 
; SAVE REGS 



.:BR IF LINE COUNT NOT ZERO 
i FORM FEED 
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3751 3ECA 




MVI 


A, -54 


3753 320436 




STA 


LINCNT 


3756 210636 




LXI 


H, HEAD 


3759 CD2636 




CALL 


PRTLINE 


375C CD9A37 




CALL 


CLRBUF 


375F C36A37 




JMP 


CSET1 


3762 3A0536 


CKCR : 


LDA 


CHARSV 


3765 FE0D 




CPI 


ODH 


3767 C27337 




JNZ 


CKLF 


376A 213536 


CSET1 : 


LXI 


H, BUF 


376D 220036 




SHLD 


CHARPOS 


3770 C38A37 




JMP 


ASVEND 


3773 FE0A 


CKLF : 


CPI 


0AH 


3775 C28F37 




JNZ 


DOPRT 


3778 218436 




LXI 


H, BUF+79 


377B 360D 




MVI 


M, ODH 


377D 213536 




LXI 


H, BUF 


3780 CD2636 




CALL 


PRTLINE 


3783 CD9A37 




CALL 


CLRBUF 


786 210436 




LXI 


H, LINCNT 


3789 34 




INR 


M 


378A Fl 


ASVEND : 


POP 


PSW 


378B El 




POP 


H 


378C Dl 




POP 


D 


378D CI 




POP 


B 


378E C9 




RET 




378F 2A0036 


} 

DOPRT : 


LHLD 


CHARPOS 


3792 77 




MOV 


M, A 


3793 23 




I NX 


H 


3794 220036 




SHLD 


CHARPOS 


3797 C38A37 




JMP 


ASVEND 


379A 


CLRBUF 


EQU 


* 


379A 0650 




MVI 


B.. 80 


379C 213:536 




LXI 


H, BUF 


379F 3E0D 




MVI 


A, ODH 


37A1 77 


CLRLP : 


MOV 


M, A 


37A2 23 




I NX 


H 


37A3 ©5 




DCR 


B 


37R4 C2A137 




JNZ 


CLRLP 


37A7 C9 




RET 




3600 




ORG 


3600H 


3600 0000 


CHARPOS : 


DW 


602 00 


PRTOFF 


DB 





^603 80 


LINOFF 


DB 





3604 00 


LINCNT 


DB 





3605 00 


CHRRSV- 


DB 






.; SET C0UNT=-54 
.: PRINT HEAD-2L5T 



; GET CHARACTER 
i CARRIAGE RETURN 
j BR IF NOT 
.; RESET CHAR PTR 



;LINE FEED 
:BR IF NOT 
jCCR TO BUF 



LINE COUNT + 1 
RESTORE REGISTER: 

#*::+::+:+***EXIT 

; PUT CHAR IN BUF 



.; ROUTINE ENTRY 
.; CHAR CNT 

; SPACE 

.; TO MEMORV 



; DO WHOLE BUFFER 
: ****EXIT 
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3606 

3606 09093830 
360A 3830204D 
360E 4143524F 
3612 20415353 
3616 454D424C 
361A 45522056 
361E 45522032 
3622 2E30 



HEAD 



EQU 
DB 



8080 MACRO ASSEMBLER VER 2. 0- 



3624 


0D 




DB 


0DH 


3625 


00 


LFFLG : 


DB 





3626 




PRTLINE 


EQU 


$ 


526 


4E 




MOV 


C, M 


3627 


CD2037 




CALL 


LI STOUT 


362A 


79 




MOV 


A, C 


362B 


FEOD 




CPI 


ODH 


362D 


CA3436 




•JZ 


LINEND 


3630 


23 




I NX 


H 


3631 


C32636 




JMP 


PRTLINE 


3634 


C9 


LINEND: 


RET 




3635 




BUF : 


DS 


80 


0000 






END 





J GET CHARACTER O-O 



.; COMPARE WITH CARRIAGE RETURN 



i LINE PRINTER BUFFERD, 



COMMEN 
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Program High Speed Paper Tape Reader with Stepper Motor Control 



Function 



Required 
Hardware 



This circuit and program allow paper tape to be read at 
approximately 150 characters per second. The reader is 
assigned by monitor command "AR=1." The program uses 
electronic damping, under software control, of a stepper 
motor to increase stepping speed and precision. 



Intellect 8-80 

(See attached schematic). 

Output port 3, input ports 1 and 3 shared with TTY interface 



Required 8080 Monitor 

Software 



Input 
Parameters 



Output 
Results 



Monitor Commands: 

"AR=1" assigns reader device 

"R" read hex tape or any other reader commands 



The high speed reader will perform the same functions as 
ITY tape reader under command of monitor, text editor, 
macro assembler, or other user defined programs. 



Registers Modified: 

A, Flags 



RAM Required: 

2 Bytes in Stack 



ROM Required: 

80 Bytes ( 50H) 



Maximum Subroutine Nesting Level: 





Assembler/Compiler Used: 

Intellec Macro Assembler 



Programmer: 

J. Garner 






Company: Be)1 HeHcopter 

Box 432,Ft. Worth, Texa s76l01 

— _____ __ 
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REF. NO. AC? 

PROGRAM HIGH SPEED PAPER TAPE READER WITH STEPPER MOTOR CONTROL 



HIGH SPEED READER 

FOR USE WITH INTELLEC 8/80 

I/O PORTS ARE SHARED WITH 

TTV INTERFACE. 

THE STEPPER MOTOR CONTROL 

MAV BE MODIFIED FOR OTHER 

MOTORS BV CHANGING THE 

ACCELERATION AND 

DECELERATION TIMES. 



3706 
1706 
721 
3721 
2723 
3724 
3725 
3726 
3727 
3729 
372C 
372F 
3731 



C32137 

DB01 

2F 

17 

D8 

E5 

E6C0 

FA6F37 

CA7437 

3E04 

D303 



OUTM : 
DELAY 



ORG 

JMP 

ORG 

IN 

CMA 

RAL 

RC 

PUSH 

AN I 

JM 

JZ 

MVI 

OUT 

MACRO 

MVI 



3706H 
3721H 
3721H 

1 



H 

0C0H 
OUT1 
0UT2 
A, 4 
3 

TDEL 
H, TDEL 



; OR 3789H FOR READER #2 



READ MOTOR STATUS 

SET CARRV IF NO TAPE 
RETURN ON NO TAPE 
STORE REGISTER CONTENTS 
MASK FOR STATUS 
LOAD PATTERN "081" 
LOAD PATTERN "018" 

STEP MOTOR 
DELAV MACRO 



CNT1 
CNT2: 



3733 2617 + 
+ 

3735 2E0C +CNT1; 

3737 2D +CNT2: 

7 38 C23737 + 

J-P3B 25 + 

373C C23537 + 



MVI 

DCR 

JNZ 

DCR 

JNZ 

ENDM 

DELAV 

MVI 

MVI 
DCR 
JNZ 
DCR 
JNZ 



L, 0CH ; 

L 

CNT2 

H 

CNT1 

17H ; 
H, 0O017H 

L, 0CH } 

L 

CNT2 

H 

CNT1 



LOAD INNER LOOP COUNT 



END DELAV MACRO 

STEP FORWARD C ACCELERATE > 



LOAD INNER LOOP COUNT 
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373F 2617 




MVI 


H, O0017H 




3741 2E0C 


CNT1 : 


MVI 


L, OCH ; 


LOAD INNER LOOP COUNT 


3743 2D 


CNT2: 


DCR 


L 




3744 C24337 




JNZ 


CNT2 




3747 25 




DCR 


H 




3748 C24137 




JNZ 


CNT1 




374B 8F 




RRC 






374C D303 




OUT 


3 i 


STEP BACK < DECELERATE > 




+ 


DELAV 


6 




374E 2606 


+ 


MVI 


H, 00O06H 




3750 2E0C 


+ 
+CNT1 : 


MVI 


L, OCH i 


LOAD INNER LOOP COUNT 


3752 2D 


+CNT2 : 


DCR 


L 




3753 C25237 


+ 


JNZ 


CNT2 




3756 25 


+ 


DCR 


H 




3757 C25037 


+ 


JNZ 


CNT1 




375A 07 




RLC 






, 7 5B D303 




OUT 


3 .= 


STEP FORWARD (HOLD) 




+ 


DELAV 


OCH :- 


ALLOW TO STOP 


375D 260C 


+ 


MVI 


H, 0O0OCH 




375F 2E0C 


+ 
+CNT1 : 


MVI 


L, OCH i 


LOAD INNER LOOP COUNT 


3761 2D 


+CNT2 : 


DCR 


L 




2762 C26137 


+ 


JNZ 


CNT2 




3765 25 


+ 


DCR 


H 




3766 C25F37 


+ 


JNZ 


CNT1 




3769 DB03 




IN 




READ DATA 


376B 2F 




CMA 






376C El 




POP 


H i 


RESTORE REGISTERS 


_■ 1 WW fc™.»fc. 

376D B7 




ORA 


A > 


; CLEAR THE CRRRV BIT 


376E C9 




RET 






376F 3E09 


0UT1 : 


MVI 


A, 09H 


■■ LOAD PATTERN "100"DRI 


3771 C33137 




JMP 


OUTM 




3774 3E02 


0UT2 : 


MVI 


A, 2 




3776 C33137 




JMP 


OUTM 




0000 




END 
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BIT 7 



BIT6 



INVERTERS 
ARE SN7403 




INPUT PORT 3 

BIT 5 B1T4- . BIT3 



S\ INPOT PORT \ 

BlTO B\T 7 




^roiso j-^ Dl so rg^o g^ g^ 50 3j; iso 5K o(m ik wro [a^i 



.<£ 



INPUT PORT 1 
BIT 6 

OUTPUT PORT^ 
BIT 2 



INPUT PORT i 
BIT 5 

OUTPUT PORT_i 
BIT I 



OUTPUT P0ST_2 
BIT 



T 



NOTE'. PH0TOTRANSIST0RS AF.I SPACED TO 

ACCOMODATE HOLE PATTERN OF TAPE. 
* THIS TRANSISTOR PLACED TO DETECT 
PRESENCE OF TAPE. 



HIGH SPEED TAPE READER 





STEPPER MOTOR 

5tt 036 -0030 -AB 
(WARNER) 

WYTH 36 TOOTH 
SPROCKET 



CO 



iny 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref no. 



AB19 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 D 8008 £J 8080 



(use additional sheets if necessary) 



Terminal Editor 

Procedure for controlling an ASR733 Texas Instruments terminal equipped 
with RDC (remote control device) option. Search a line in a file 
contained in cassette 1 with or without copying on cassette 2. The 
procedure is linked to the Intel lee monitor. 



Intel lee 8/Mod 80 



Intellec 80 monitor 



The procedure is accessed via the "U" and "V" monitor commands 

<Search without copying command>: :=U<String> 

<Search copying command>: :=V<String> 
String can be of any length from 1 to 86 characters, the convention for 
EOF is a "$" in column 1. The line typed in need not be of the same 
length of the line to be found. A carriage return as first character 
of the string means to search the previous string in the following file. 



When the line is not found before an EOF the terminal prints a blank line, 
When the string is found, the terminal prints an equal sign ("="). 



Registers Modified: 



_NA_ 



RAM Required: 
130 



Assembler/Compiler Used: 
PLM80 



ROM Required: 
187H 



Maximum Subroutine Nesting Level: 
I — Untc: monitor mnHififtfj 



Programmer: 

Enrico Massetti 



Company: 

Laboratorio Massetti 



Address: 

20133 Milano, Via Ronchi 17 
ITALY 
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00001 




00002 




00003 




00004 




00005 




C 96 




00007 




00008 




00009 




00010 




00011 




00012 


2 


00013 


2 


00014 


2 


00015 


2 


00016 


1 


00017 


1 


00018 


2 


00019 


2 


00020 


1 


00021 


2 


00022 


2 


00023 


2 


00024 


2 


00025 


2 


0002b 


1 


00027 


2 


00028 


2 


00029 


2 


00030 


2 


00"11 


2 


01 j2 


2 


00033 


2 


00034 


2 


00035 


3 


00036 


3 


00037 


2 


00038 


2 


00039 


1 


00040 


1 


00041 


1 


00042 


2 


00043 


2 


00044 


2 


00045 


2 


00046 


3 


00047 


3 


00048 


3 


00049 


2 


00050 


2 


00051 


1 


00052 


2 


00053 


2 


00054 


2 


00055 


2 


00056 


2 


oa ' 


2 


OOUoB 


2 


00059 


2 


00060 


3 



/*REF NO. AB19 V 

/♦PROGRAM TITLE TERMINAL EDITOR*/ 

/* PROCEDURE FOR CONTROLLING AN ASR733 TEXAS TERMINAL EQUIPED 
WITH RDC (REMOTE DEVICE CONTROL) OPTION.*/ 

declare (car, block) (86) byte, 

cr literally '13'; 
/* linkage to" 8080 monitor.*/ 
declare co literally '3c32h*; 
ttyout: procedure (char); 
declare char address; 

CHARSSHL (CHAR, 8); 

GO TO co; 
END ttyout; 

DECLARE CI LITERALLY '3C76H*; 
TTYIN: PROCEDURE BYTE; 

GO TO ci; 
END ttyin; 

dleout: procedure ( carattere); 
declare carattere byte; 
call tty0utu6);/* dle */ 
call ttyout(carattere),*/* caratter */ 
return; 
end dleout; 

read$block: procedure (inblock); 
declare inblock address, 

block based inblock byte, 

N BYTE, 
TEMP BYTE; 
IF (TEMP:s TTYIN)sCR THEN RETURN; 

ELSE BLOCK(0)s TEMP; 
DO N = 1 TO 85; 

BLOCK (N)=TTYIN; 
IF BLOCK(N)=CR THEN RETURN; 
END; 
RETURN; 
END read$block; 

/* 

*/ 

onesblock: procedure byte; 

CALL DLE0UT(55); /* DLE 7 = BLOCK FWD */ 
CALL READ$BLOCK (.BLOCK); 
IF BLOCK = 36 THEN DO,*/* 36 = 

CALL TTYOUT (20);/* DC4 

CALL DLEOUT (57);/* DLE 

RETURN 0; 

end; 
else return ofph; 
end onesblock; 
predisp; procedure byte; 
declare status byte; 

/* CASSETTE 1 IN PLAYBACK 2 IN RECORD */ 

CALL DLEOUT (48); /* DLE a PRINTER OFF */ 

CALL DLEOUT (54); /* DLE 6 = CASS1 PLY,CASS2 RECORD */ 

CALL DLEOUT (60); /* DLE < s STATUS REQUEST */ 

STATUS = TTYIN;/* VERIFY TERMINAL STATUS */ 

VERIFICASSTATO : IF (STATUS AND 1FH)<> 1FH THEN DO;/* STATUS NOT OK */ 

CALL DLEOUT (57); /* DLE 9 = PRINTER ON */ 

RETURN 0; 



END OF FILE */ 
RECORD OFF */ 
= PRINTER ON */ 
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00061 3 end; 

00062 2 ELSE RETURN OFFH; 

Hill l /J D 1HE E pJuCEDURE RETURNS IF THE TERMINAL IS NOT PREDISPOSED, 1 IF ALL OK*/ 

0006b 1 /* PROCEDURE FOR CONFRONTIG THE CAR AND BLOCKS*/ 

OOC 1 BLOCKSCONFR: PROCEDURE BYTE; 

0006/ 2 DECLARE N b¥TE,* 

00068 2 DO N=0 TO 85; 

00069 2 IF CAR(N)OBLOCKCN) THEN DO; 

00070 3 IF CAR(N)=CR THEN RETURN 1; 

J 0071 4 ELSE RETURN 0;/*BLOCKS DIFFERENT*/ 

00073 3 ELSE^IF CAR(N)=CR THEN RETURN OFFH; ^IDENTICAL BLOCK*/ 

00074 3 end; 

00075 2 RETURN OFFH; /*IDENTICAL BLOCKS*/ 

Itlri 1 /* D THE°p5oCeSuRRE RETURNS TO THE CALLING POINT THE FOLLOWING VALUES: 

00078 1 = BLOCK NOT EQUALS 

000 79 i 1 = BLOCK CAR IS A SUBSET OF BLOCK BLOCK 

OOOfiO 1 OFFH = BLOCKS INDENTICAL */ „_ 

00081 1 /* PROCEDURE FOR CONTROLLING AN ASR 733 TEXAS TERMINAL EQUIPED WITH RDC 

00083 1 SEARCH'bF A LINE IN FILE CONTAINED INTO CASSETTE 1 WITH OR WITHOUT 

oSo84 1 PARAMETER COPIA=0 : SEARCH WITHOUT COPYING; PARAMETER COPIA=l ; SEARCH 

0008b 1 COPYING. */ 

00086 1 RICERCASBLOCK: PROCEDURE (COPIA); 

00087 2 DECLARE (COPIA ,TEMP)BYTE; 

00088 2 ENTEHSBLOCK: CALL READSBLOCK (.CAR); M( r M nBV 

00089 2 /* THE L1NF TO BE FOUND COMES FROM THE KEYBOARD AND IS PUT IN THE MEMORY 
00^90 2 IN THE CAR POSITIONS. THE LINE CAN BE OF ANY LENGH FROM 1 86 CARACTERS 
0S00? 2 THE CONVLNCTION FOR AND OF FILE IS THE ASCII CARACTER $ IN COLUMN 1. 
oSc 2 WHEN THIS CARACTER IS FOUND IN COLUM 1 THE TERMINAL PRINTS <> AND THE 

00093 2 PROGRAM RETURNS TO THE CALLING POINT. .,..„,. 

00094 2 THE LINE TYPED IN NEEDS NOT TO BE OF THE SAME LENGH OF THE LINE TO BE tOUND 
0009b 2 FOR EXAMPLE: _ = __ _ ._..-- 

00096 2 " -_-. — ----- 

00097 2 FIRST, SECOKD, THIRD 

0009B 2 (THIS IS THE LINE TO BE FOUND) 

00099 2 FIRST 

00100 



2 " (THIS IS A VAID INDICATION TO FIND THAT LINE) 



00101 2 

00103 2 IF PREDISP=0 THEN RETURN;/* TERMINAL NOT PREDISPOSED*/ 

/, n , n , v it- rnPTA =1 THEN CALL TTYOUT ( 1 8 ) ,* /*DC2=REC0RD ON */ 

0010b 2 loOP? " ONEBLOCK=0 THEN DO;/*BLOCK NOT FOUND.FOUND EOF (S) PRINTSO */ 

00106 2 CALL TTYOUT (60);/* < */ 

00107 3 CALL TTYOUT (62);/* > */ 

00108 3 return; end; 

00109 2 /* block found, start confront*/ „„„,„,, 

00110 2 IF UEMP:=BLOCK$CONFR)=0 THEN GO TO LOOP; /*BLOCKS DIFFERENT*/ 

00111 2 CALL TTYOUT (20); /*DC4=RECORD OFF*/ 

00112 2 CALL DLEOUT (41); /*DLE9=PRINTER ON*/ 

00113 2 CALL ITYOUT (61); /*=*/ 

00114 2 return; 

0011b 2 END RICERCASBLOCK; 

00116 1 EOF 

NO OGRAM ERRORS 
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MICROCOMPUTER 
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(use additional sheets if necessary) 



Program 
Title 

Function 



Intellec 8/M0D 80-Silent 700 Interface 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



This note describes an interface between the 
Intellec8/Mod 80 Microcomputer Development System 
and the Texas Instruments "Silent 700" Electronic 
Data Terminal. 

The interface consists of an Intellec/Silent 700 
adapter. In addition, the "Silent 700" terminal 
and Intellec 8 /Mod 80 must be modified. The 
adapter and equipment modifications are described 
in this note. 

The interface was designed for use with the basic 
Intellec configuration Cimm8-84A) and a Model 7 33ASR 
terminal equipped with the 1200 Baud Transmission 
option and either the Automatic Device Control (ADC) 
option or Remote Device Control (RDC) option. 



Output 
Results 



Registers Modified: 




Assembler/Compiler Used: 


RAM Required: 


Programmer: 

Phil Jensen 


ROM Required: 


Company: 


Maximum Subroutine 


Nesting Level: 


Address: 65 30 LB J Freeway, #17 8 
Dallas, Texas 75240 






98-034C 
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AD3 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □8008 08080 



Ium additional sheets if necessary) 



Interrupt Service Routine 



Handles multiple-level interrupts, saving all registers and 
flags and outputting the status of the current interrupt to 
an external status latch. See additional sheet. 



Priority Interrupt Control Unit (8214) with status latch 
inputs connected to appropriate output port (#255 in sample 
program) . 



INTX and ROUTX for each interrupt level to be handled, plus 
necessary routines to service the interrupts. 



A RESTART instruction is forced onto the data bus by the 
interrupt control unit. 



The status of the current interrupt routine is output 
on bits 0, l f and 2 of output port 255. The service routine 
is executed and all registers and flags from the calling 
program are save and restored after the interrupt routine 
is complete. 



Registers Modified: 

All registers are saved 



RAM Required: 

1 byte plus stack 



ROM Required: 28 bytes + 21 bytes 
per interrupt level. 



Maximum Subroutine Nesting Level: 

12 bytes per interrupt level 



Assembler/Compiler Used: 

8080 Macro Assembler V4.0 



Programmer: 

Donald E. Shorter 



Company: Tel com, Inc. 

8027 Lees burg Pike 



4/78 



Vienna, Va. aTnJo 4-130 



Ref.# AD3 



Interrupt Service Routine 

This routine is designed to be used with an external 
hardware interrupt control unit and interrupt status latch. 
A type 8214 Priority Interrupt Control Unit may be used to 
generate the appropriate RESTART instructions; the current 
status latch pins should be connected to bits 0, 1, and 2 of 
output port 255. 

With any priority interrupt situation, a problem arises 
when one interrupt service routine is interrupted by a higher 
priority signal. When the higher priority routine begins, it 
must output its status to the current status latch; after it 
is finished, control is transferred to the lower priority 
routine which was interrupted. This requires that the lower 
priority status must be sent to the status latch so that any 
higher priority interrupt may take control again. 

This routine uses one byte of RAM to store any current 
status (this byte should be set to the lowest priority at the 
beginning of the main program). When an interrupt occurs, 
this previous status is pushed into the stack and the current 
status is output to the status latch. At the end of the 
routine, the previous status is popped off the stack and out- 
put to the latch just before the program goes into the routine 
to restore the registers and return to the calling program. 
In this way, the status latch will always contain the current 
status, even if several interrupts are stacked one on top of 
another . 

The interrupt service routine saves the contents of 
all registers and flags and restores them at the end of the 
service program. Each level of interrupt requires 12 bytes 
of RAM for stack operations, plus whatever is required to 
actually service the interrupt. Interrupts may be nested 
as far as the available stack will permit. 

In the sample program, INTX is the routine which resides 
ln^an exght-byte section of the first 64 bytes of system memory; 

X" is the number, 0-7, of the interrupt routine. One INTX is 
required for each interrupt level desired. INTX saves the 
contents of all registers and flags and then jumps to the ser- 
vice routine. 

ROUTX is the service routine which saves the previous 
status in the stack and outputs the current status to the 
external latch. "x" is the number, 0-7, of the interrupt 
routine. The interrupt flip-flop is enabled and any instruc- 
tions necessary to service the interrupt are executed. Then 
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ROUTX disables the interrupt flip-flop and restores the pre- 
vious status to RAM and also to the status latch on port 255. 
One ROUTX is required for each interrupt level desired. 

SAVE is the subroutine which performs the actual status 
updating and outputting operations. Only one SAVE is required. 

RSTOR is the subroutine which restores the previous 
status to the latch and the RAM location (STATU) . Only one 
RSTOR is required. 

FINIS is the routine which restores all registers and 
flags to their original condition and returns to the calling 
program. One FINIS is required. 



Test Program 

A test program was developed to test the interrupt 
service routine; it requires the Monitor, Version 2.0 in the 
Intellec 8/Mod 80. 

The six INTX routines (INT2 - INT7) are loaded in RAM 
starting at location 10H (the first 16 bytes are required for 
operation of the Monitor and cannot be used) . The main pro- 
gram is then loaded in RAM starting at location 200H. 

The main program continuously prints a message on the 
TTY; at any time during this message, a RST2 - RST7 may be 
entered on the data bus of the Intellec by setting up the 
appropriate code on the data switches and pressing the INT 
switch. When it receives the interrupt, the program will begin 
to print the message corresponding to the number of that 
interrupt. Another interrupt may then be inserted and the 
corresponding message will be printed. When a message has 
been completely sent, the program will revert back to the re- 
mainder of the previous message, etc., until it is back to the 
main program message. 

A delay routine was incorporated to slow the printing 
so that the operator has time to set up and generate another 
interrupt signal. As each interrupt routine is active, the 
current status appears on the lower three bits of the front 
panel lights connected to output port 255. A RSTl will cause 
the program to be transferred back to the system Monitor. 



Donald E. Shorter 
Telcom, Inc. 
8027 Leesburg Pike 
Vienna, Virginia 22180 

4/78 4 ~ 131A 
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Title 
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Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



MICROCOMPUTER USER'S 
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Interrupt Handler Re-entrant 

On processor receipt of an interrupt instruction (RST 0-7), this program 
saves the machine state and previous interrupt level on the stack, trans- 
mits the new service level to the interrupt control unit (ICU), executes 
a subroutine corresponding to the level interrupt received, then 
restores the machine and ICU to their pre-interrupt state before 
resuming executing the interrupted program. 



Interrupt circuitry; test routine assumes TTY on and 1; test interrupts 
were from Intel lee 8/80 front panel. 



Service programs appropriate to the various interrupt levels expected 
background initialization; TTY test routine uses "CO" and "CRLF" in 
monitor or equiv. 

Restart instructions, RST 0-7, either from ICU or programmed. 



Interrupt routine causes branches to routines according to pointers: 
SERV1, SERV2, etc. supplied by user for his system. Test program types 
the level of interrupt received on the assigned monitor console device. 
See attached sheet. 



Registers Modified: 



None; state restored on exit 



RAM Required: (, byte variables, plus 
10 bytes/nesting level on stack, 
to stark 1 imir . 



ROM Required: 

bytes OH through 3FH, 

plus MH bytes elsewhere = 84H 



Maximum Subroutine Nesting Level: 

Fully re-entranf,stack limit 



Assembler/Compiler Used: 
Intel lee 8 Macro Assembler 



Programmer: 



John M. Mills. Lecturer 



Company: 

University of Wisconsin 



Address: 



Dept. of Mechanical Engr. 
Madison. Wisconsin 53706 



98-034E 
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Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



8008 DISASSEMBLER 

This program is used to obt 
coded program in memory. 



ain an assembly language listing of a mach 



i n<> 



INTELLEC 8 with console 1/0 device. 

12K of RAM Memory (ORG commands can be changed for less). 



INTEL 8008 MONITOR program ver 2.1. (Monitor subroutine addresses 
versions? " ^^ ° f the Pr ° 9ram f ° r Updatin 9 to other "™'tor 



The Monitor 'G' command is used to enter the program with a response 
of a carnage return and line feed. The low address and the high 

andXll^J h n ent6red " hexadecima ' fo ™t, "Pa-ted by a comma, 
and followed by a carriage return. 



A listing on the console output device of the hexadecimal address 
the hexadec.mal machine instruction, and the assembly language in- 

«> t ruci I on • 

Invalid machine instruction codes are listed as hexadecimal numbers. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



L 



Assembler/Compiler Used: 

INTELLEC 8 MACRO ASSEMBLER 



Programmer: 
Hal Kino 



Company: 



Brooks Research & Mfg 



Address: 56]2 Brignton ^^ 

Kansas City, Missouri 



98-034B 

4-134 
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Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004/4040 D8008 [28080 D8048 D8085 □ Other. 



. (use additional sheets if necessary) 



8080 DIS-ASSEMBLER (SEE NOTE BELOW) 

This program inputs an ISIS-II file in HEX format and generates a 
symbolic assembly language program suitable for editing and/or 
assembling. 



MDS-800, Dual Diskette Drives 
32K to operate 
64K to compile 



PLM-80 Diskette Resident Compiler (to compile the source) 
ISIS-II (to execute the program) 

ISIS-II file (disk file, :HR:, etc.) in Intel's HEX format 

(use OBJHEX if it's originally in ISIS-Ii, 8080 object module format) 



REVISED 10/78 

by Gary Carleton 

Intel Corp. 

Assembly language source program 

NOTE: Program source is in PLM-80 Resident compiler form. 



Available on diskette only 



Registers Modified: 

All 


Prt ¥rTcT r Serdahl 


RAMSftMPecPPerate 
64K to compile 


^cuPex Corp. Icore Div. R+D Dept. 


ROM Required: 
N/A 


d §§£' Clyde Ave. 


Maximum Subroutine Nesting Level: 

8 


Cit y. : . ., . 
Mountain View 


Assembler/Compiler Used: 

PLM-80 


State: 
CA 



@ Intel Corporation, 1976 
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INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 □ 8048 3 8080/8085 □ 8086 □ Other. 



. (use additional stoat* II necessary) 



DISASM (8080 Disassembler) 



DISASM is intended as a software development and debugging 
aid. Operating on resident object code, it produces an 
assembly language equivalent which is printed on a TTY 
terminal. In this present form, the program starts at a 
given memory address and steps sequentially through memory 
until manually halted. 

TTY on parts and 1 (as Intellec system configuration) 



Intellec 8/80 Monitor console output routine 
(or equivalent) 



See reference #AB 154, 
Page 4-725 for SYMBOL 
TABLE INSERTER 



Registers Modified: A B C D H L 



RAM Required: 



2 Bytes (pluss Stack) 



ROM Required: 7gi By( . 



es 



Maximum Subroutine Nesting Level: 



2 levels 
(4 bytes) 



Assembler/Compiler Used: 



8080 Macro 
Assembl er, V 3.0 



Programmer: s# N# Brunner 



Company: General Electric 



Address: Bld § SO" 1 
2901 East Lake Road 



City: 



Erie 



State: 



PA 



16531 



© Intel Corporation, 1978 
2/79 
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REF. NO. AB22 
PROGRAM NAME DI: 



: .ASM C8080 DISASSEMBLER) 



1B0O 






ORG 


1BO0H 


3809 




CO 


EQU 


3809H 


1B00 


2A081D 


RDBVTE : 


LHLD 


PC 


1B03 


7E 




MOV 


A, M 


1B04 


23 




I NX 


H 


1B05 


22081D 




SHLD 


PC 


1B08 


C9 




RET 




1B09 


3C 


RGPRNT : 


INR 


A 


1B0A 


E60? 




AN I 


07 


1B6C 


FE06 




CPI 


06 


38E 


DA131B 




JC 


RGP1 


xBll 


C603 




AD I 


03 


1B13 


FE05 


RGF'l : 


CPI 


05 


1B15 


DA1A1B 




JC 


RGP2 


1B18 


C602 




AD I 


02 


1B1A 


C641 


RGP2: 


AD I 


41H 


1B1C 


4F 




MOV 


C, A 


IBID 


C30938 




JMP 


CO 


1B28 


4? 


DECODE : 


MOV 


B, A 


1B21 


E6F0 




AN I 


0FOH 


1B23 


OF 




RRC 




1B24 


OF 




RRC 




1B25 


OF 




RRC 




1B26 


OF 




RRC 




1B27 


C690 




AD I 


90H 


1B29 


'!>"? 




DAA 




1B2A 


CE40 




AC I 


40H 


1B2C 


27 




DAA 




1B2D 


4F 




MOV 


C, A 


1B2E 


CD8938 




CALL 


CO 


1B31 


7'~« 




MOV 


A, B 


1B32 


ESF8 




AN I 


OFOH 


1B34 


C690 




AD I 


90H 


1B36 


27 




DAA 




* c :37 


CE40 




AC I 


40H 


j39 


27 




DAA 




1B3A 


4F 




MOV 


C A 


1B3B 


C30938 




JMP 


CO 
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1B3E 8604 


PRINT: 


MVI 


B, 4 


1B40 4E 


PI: 


MOV 


C, M 


1B41 CD0938 




CALL 


CO 


1B44 23 




I NX 


H 


1B45 05 




DCR 


B 


1B46 C2401B 




JNZ 


PI 


1649 0E20 




MVI 


C, 20H 


1B4B C30938 




JMP 


CO 


1B4E 7A 


XTRACT : 


MOV 


A.. D 


1B4F E638 




AN I 


38H 


1B51 0F 




RRC 




1B52 0F 




RRC 




1B53 0F 




RRC 




1B54 C9 




RET 




1B55 CD4E1B 


CCPRNT : 


CALL 


XTRACT 


1B58 87 




ADD 


A 


1B59 4F 




MOV 


C, A 


1B5A 21081E 




LXI 


H, CCODE 


1B5D 09 




DAD 


B 


35E 4E 




MOV 


C, M 


xB5F CD0938 




CALL 


CO 


1B62 23 




INX 


H 


1B63 4E 




MOV 


C, M 


1B64 CD0938 




CALL 


CO 


1B67 OE20 




MVI 


C, 20H 


1B69 CD0938 




CALL 


CO 


1B6C C30938 




JMP 


CO 


1B6F CD4E1B 


RPPRNT : 


CALL 


XTRACT 


1B72 E606 




AN I 


06 


1B74 FE06 




CPI 


06 


1B76 C2091B 




JNZ 


RGPRNT 


1B79 8E53 




MVI 


C, 53H 


1B7B CD0938 




CALL 


CO 


1B7E 0E50 




MVI 


C, 50H 


1B80 C30938 




JMP 


CO 


1B83 0E8D 


DISflSM: 


MVI 


C, ODH 


1B85 CD0938 




CALL 


CO 


1B88 0E9fl 




MV I 


C OAH 


1B8A CD0938 




CALL 


CO 


1B8D 2A081D 




LHLD 


PC 


1B90 ?C 




MOV 


A, H 


1B91 CD201B 




CALL 


DECODE 


"=:34 7D 




MOV 


fl.. L 


j95 CD201B 




CALL 


DECODE 


1B98 0E28 




MVI 


C, 20H 


1B3A CD0938 




CALL 


CO 
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1B9D 
1BA0 
1BA3 
1BA4 
1BA7 
1BAA 
1BAB 
1BAE 
1BAF 
1BB0 
1BB3 
1BB5 
1BB6 
1BB7 
1BBA 
1BBB 
1BBC 
1BBF 
1BC1 
1BC2 
1BC5 
?C6 
xBC? 
1BCA 
1BCC 
1BCE 
1BD1 
1BD3 
1BD6 
1BD7 
1BD9 
1BDB 
1BDE 
1BDF 
1BE2 
1BE3 
1BE6 
1BE7 
1BE9 
1BEC 
1BED 
1BEF 
1BF1 
1BF4 
1BF6 
1BF9 
J ^FB 
iFE 

1C00 

1C03 



CD0938 
CD001B 

210A1D 

011100 

BE 

CAFA1C 

23 

0D 

C2AA1B 

0E0A 

BE 

BE 

CAE61C 

23 

0D 

C2B61B 

0E06 

BE 

CACA1C 

23 

0D 

C2C11B 

E6C0 

FE40 

CAB01C 

FE80 

CAA11C 

7A 

E6C7 

D604 

CA921C 

3D 

CA8C1C 

3D 

CA781C 

7A 

E6C0 

CA4C1C 

7A 

E6C7 

D6C0 

CA411C 

D602 

CA361C 

D602 

CA2B1C 

D603 

CA1F1C 

7A 



Dl: 



D2: 



D3: 



CALL 


CO 


CALL 


RDBVTE 


MOV 


D, A 


LXI 


H, TABLE 


LXI 


B, 11H 


CMP 


M 


JZ 


TGI 


I NX 


H 


DCR 


C 


JNZ 


Dl 


MVI 


C, 0AH 


CMP 


M 


CMP 


M 


JZ 


TG2 


I NX 


H 


DCR 


C 


JNZ 


D2 


MVI 


C, € 


CMP 


M 


JZ 


TG3 


I NX 


H 


DCR 


C 


JNZ 


D3 


AN I 


0C0H 


CPI 


40H 


JZ 


MGO 


CPI 


89H 


JZ 


MG1 


MOV 


A, D 


AN I 


0C7H 


SUI 


84 


JZ 


MG2 


DCR 


A 


JZ 


MG3 


DCR 


A 


JZ 


MG4 


MOV 


A, D 


AN I 


0C0H 


JZ 


MG5 


MOV 


A, D 


AN I 


0C7H 


SUI 


0C0H 


JZ 


MG6 


SUI 


02 


JZ 


MG7 


SUI 


02 


JZ 


MG8 


SUI 


03 


JZ 


MG3 


MOV 


A, D 
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1C04 
1C06 
1C07 
1C0R 
1C0B 
1C6E 
1C11 
1C13 
1C16 
1C19 
1C1C 
1C1F 
1C22 
1C25 
1C28 
1C2B 
1C2D 
1C30 
1C33 
1C36 
1C38 
:3B 
±C3E 
1C41 
1C43 
1C46 
1C49 
1C4C 
1C4F 
1C59 
1C52 
1C53 
1C56 
1C58 
1C5B 
1C5D 
1C5E 
1C5F 
1C60 
1C61 
1C64 
1C67 
1CSA 
1C6D 
1C70 
1C72 
'<-:75 
J78 
1C7B 
1C7E 



E607 

4F 

21FF1D 

09 

CD3E16 

CD4E1B 

FE06 

C29B1C 

21FC1D 

CD3E1B 

C3831B 

21F81D 

CD3E1B 

CD201B 

C3831B 

0E43 

CD9938 

CD551B 

C3D51C 

0E4A 

CD0938 

CD551B 

C3D51C 

0E52 

CD0938 

CD551B 

C3831B 

21E01D 

7R 

E60F 

3D 

CA6A1C 

FE04 

DA5D1C 

D605 

87 

87 

4F 

09 

CD3E1B 

CD6F1B 

C3831B 

CD3E1B 

CD6F1B 

0E2C 

CD0938 

C3D51C 

21DC1D 

CD3E1B 

CD4E1B 



MQ9: 



MG8: 



MG7: 



MG6: 



MG5: 



D4: 



MG51 



MG4 : 



AN I 


07 


MOV 


C, A 


LXI 


H, PPOP-1 


DFID 


B 


CALL 


PRINT 


CALL 


XTRACT 


CPI 


06 


JNZ 


06 


LXI 


H, PPSW 


CALL 


PRINT ' 


JMP 


DISASM 


LXI 


H, PRST 


CALL 


PRINT 


CALL 


DECODE 


JMP 


DISASM 


MVI 


C, 43H 


CALL 


CO 


CALL 


CCPRNT 


JMP 


D7 


MVI 


C, 4AH 


CALL 


CO 


CALL 


CCPRNT 


JMP 


D7 


MVI 


C, 52H 


CALL 


CO 


CALL 


CCPRNT 


JMP 


DISASM 


LXI 


H, PLXI 


MOV 


A, D 


AN I 


OFH 


DCR 


A 


JZ 


MG51 


CPI 


04 


JC 


D4 


SUI 


05 


ADD 


A 


ADD 


A 


MOV 


C, A 


DAD 


B 


CALL 


PRINT 


CALL 


RPPRNT 


JMP 


DISASM 


CALL 


PRINT 


CALL 


RPPRNT 


MVI 


C, 2CH 


CALL 


CO 


JMP 


D7 


LXI 


H, PMVI 


CALL 


PRINT 


CALL 


XTRACT 
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1C81 


CD891B 




CALL 


RGPRNT 


1C84 


0E2C 




MVI 


C, 2CH 


1C86 


CD0938 




CALL 


CO 


1C89 


C2F11C 




JMP 


DS 


1C8C 


21D81D 


MG3: 


LXI 


H, PDCR 


1C8F 


C3951C 




JMP 


D5 


1C92 


21D41D 


MG2: 


LXI 


H, PINR 


1C95 


CD3E1B 


D5: 


CALL 


PRINT 


1C98 


CD4E1B 




CALL 


XTRACT 


1C9B 


CD091B 


06: 


CALL 


RGPRNT 


1C9E 


C3831B 




JMP 


DISASM 


1CA1 


7A 


MG1: 


MOV 


A, D 


1CA2 


E638 




AN I 


38H 


1CA4 


0F 




RRC 




1CA5 


4F 




MOV 


C, A 


1CA6 


21B41D 




LXI 


H, PADD 


1CA9 


09 




DAD 


B 


1CAA 


CD3E1B 




CALL 


PRINT 


1CAD 


C3C11C 




JMP 


D9 


1CB0 


21B01D 


MG0: 


LXI 


H, PMOV 


1CB3 


CD3E1B 




CALL 


PRINT 


^B6 


CD4E1B 




CALL 


XTRACT 


J.CB9 


CD091B 




CALL 


RGPRNT 


1CBC 


0E2C 




MVI 


C, 2CH 


1CBE 


CD0938 




CALL 


CO 


1CC1 


7A 


D9: 


MOV 


A,D 


1CC2 


E607 




AN I 


07 


1CC4 


CD891B 




CALL 


RGPRNT 


1CC7 


C3831B 




JMP 


DISASM 


1CCA 


79 


TG3: 


MOV 


A, C 


1CCB 


87 




ADD 


A 


1CCC 


87 




ADD 


A 


1CCD 


4F 




MOV 


C, A 


1CCE 


21941D 




LXI 


H, TAB3-4 


1CD1 


09 




DAD 


B 


1CD2 


CD3E1B 




CALL 


PRINT 


1CD5 


CD001B 


D7: 


CALL 


RDBVTE 


1CD8 


57 




MOV 


D, A 


1CD9 


CD081B 




CALL 


RDBVTE 


1CDC 


CD281B 




CALL 


DECODE 


1CDF 


7A 




MOV 


A, D 


1CE8 


CD201B 




CALL 


DECODE 


1CE3 


C3831B 




JMP 


DISASM 


1CE6 


79 


TG2: 


MOV 


A, C 


1CE7 


87 




ADD 


A 


1CE8 


87 




ADD 


A 


'•::E9 


4F 




MOV 


C, A 


JEA 


216C1D 




LXI 


H, TAB2-4 


ICED 


09 




DAD 


B 


1CEE 


CD3E1B 




CALL 


PRINT 
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1CF1 CD001B 


D8: 


CALL 


RDBVTE 




1CF4 CD201B 




CALL 


DECODE 




1CF7 C3831B 




JMP 


DISASM 




1CFA 79 


TGI: 


MOV 


A, C 




1CFB 87 




ADD 


A 




1CFC 87 




ADD 


A 




1CFD 4F 




MOV 


C, A 




1CFE 21271D 




LXI 


H, TAB1-4 




1D01 09 




DAD 


B 




1D02 CD3E1B 




CALL 


PRINT 




1D05 C3831B 




JMP 


DISASM 




1D08 


PC: 


DS 


2 




1D0A 00070F17 


TABLE : 


DB 


000H, 007H, 80FH, 


017H 


1D0E 1F272F37 




DB 


01FH, 827H, 02FH, 


037H 


1D12 3F76C9E3 




DB 


03FH, 076H, 0C9H, 


0E3H 


1D16 E9EBF3F9 




DB 


0E9H, 0EBH, 0F3H, 


0F9H 


1D1A FBC6CED3 




DB 


0FBH, 0C6H, 0CEH, 


0D3H 


1D1E D6DBDEE6 




DB 


0D6H, 0DBH, ODEH, 


0E6H 


1D22 EEF6FF22 




DB 


0EEH, 0F6H, OFFH, 


822H 


1D26 2A323AC3 




DB 


02AH, 032H, 03AH, 


8C3H 


1D2A CD 




DB 


0CDH 




•>2B 45492820 


TAB1: 


DB 


'EI ', 'SPHL'', 


'DI 


XD2F 20535048 










1D33 4C444920 










1D37 20584348 










1D3B 47 










1D3C 5043484C 




DB 


'PCHL', 'XTHL", 


"RET 


1D48 5854484C 










1D44 52455420 










1D48 484C5420 











'XCHG' 



HLT 



1D4C 434D4320 
1D50 53544320 
1D54 434D4120 
1D58 44414120 



DB 



CMC ', 'STC 



CMA 



DAA 



1D5C 52415220 
1D60 52414C20 
1D64 52524320 
1D68 524C4320 



DB 



'RAR 



RAL 



'RRC ', "RLC 



j6C 4E4F5020 DB 
1D70 43504920 TAB2 : DB 
1D74 4F524920 



'NOP ' 

'CPI ', "ORI ', 'XRI 'i ' ANI 
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1D78 58524920 
1D7C 414E4920 



1D80 53424920 
1D84 494E2020 
1D88 53554920 
1D8C 4F555420 



DB 



'SBI ', 'IN ', 'SUI ', 'OUT 



1D90 41434920 
1D94 41444920 
1D98 43414C4C TAB3: 
1D9C 4R4D5020 
IDA© 4C444120 
1DA4 53544120 



DB 'flCI ', 'RDI ' 

DB "CALL', 'JMP ', 'LDfl ', 'STfl 



IDAS 4C484C44 
lDflC 53484C44 

>B0 4D4F5620 PMQV: 
1DB4 41444420 PfiDD: 
1DB8 41444320 
1DBC 53554220 
1DC0 53424220 



DB 



DB 
DB 



'LHLD', 'SHLD' 



'MOV ' 

'HDD ', 'ADC ', 'SUB ', 'SBB 



1DC4 414E4120 
1DC8 58524120 
1DCC 4F524120 
1DD0 434D5O20 



DB 



'RNfi ', 'XRfl ', 'ORfl ' , 'CMP ' 



1DD4 


494E5220 


PINR 


DB 


'INR ' 




1DD8 


44435220 


PDCR 


DB 


'DCR ' 




1DDC 


4D564920 


PMVI 


DB 


'MVI ' 




1DE0 


4C584920 


PLXI 


DB 


'LXI ', 'STFIX', 'INX 


', 'DflD ' 


1DE4 


53544158 










1DE8 


494E5820 










1DEC 


44414420 










1DFO 


4C444158 




DB 


'LDflX', 'DCX ' 




1DF4 


44435828 










■^F8 


52535420 


PRST 


DB 


'RST ' 




J-FC 


50535720 


PPSW 


DB 


'PSW ' 




1E00 


504F5020 


PPOP 


DB 


'POP ', 'PUSH' 





1E04 50555348 
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1E98 4E5A5A20 CCODE : DB 'HZ', 'Z ', 'NC, 'C ' 
1E0C 4E434328 

1E10 504F5045 DB 'PO', 'PE', "P ^ 'M ' 
1E14 50204D20 

0900 END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref No 



AB23 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 □ 8008 (X] 8080 □ 4040 



(use additional sheets if necessary) 



BINLB — 8080 System Loader 

Loads Hex Format Paper Tape produced by Macro-Assembler 
on GE Time Sharing into 8080 system. Also provides TTY 
input and output subroutines. BINLD can also produce 
a binary dump of itself for bootstrap loading. 



TTY — This program uses a serial TTY interface and a 
hardware timer. This can be easily changed. 



NONE 



Hex format paper tape 



Loaded program 



Registers Modified: 



RAM Required: 

256 Bytes 



ROM Required: 

NONE 



Maximum Subroutine Nesting Level: 

N/A 



Assembler/Compiler Used: 

MACRO/8080 



Programmer: 

George Miler 



Company: 



JjlJLERTnQNICS 



Airnnrt Rd . 



Greenville, S.C. 



29607 
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REF. NO. AB23. 

PROGRAM NAME 808O SVSTEM LOADER 



4, 22, 75 
WRITTEN BV 
MILERTRQNICS DIV. 
GEORGE MILER INC. 
525-A AIRPORT RD. 
GREENVILLE, S. C. 29607 
< 803 > 242-9232 

BINLD LOADS INTEL HEX FORMAT 
OBJECT TAPE ASSEMBLER 
REG B USED TO GENAERATE CHARACTER 
REG C USED TO FOR BUT IT COUNT 8SERIAL 
REG D USED FOR TEMP STORAGE 
REG E USED FOR CHARACTER COUNT 



I/0> 



0E00 






ORG 


0EO0H 




0E00 


3EC9 




MVI 


A, 0C9H 




0E02 


321800 




STA 


18H 




0E05 


F3 


START : 


DI 






0E06 


3110OF 




LXI 


SP, 0F1OH 








i BEGINNING OF 


MAIN BINLD 


PROGRAM 


0E09 


AF 


BINLD: 


XRA 


A 




0E0A 


32D10E 




STA 


CHECK 




0E0D 


CDA80E 




CALL 


TTV 




0E10 


FE3A 




CPI 


3AH 




0E12 


C2090E 




JNZ 


BINLD 




0E15 


CDA80E 




CALL 


TTV 




0E18 


50 




MOV 


D, B 




0E19 


CDA80E 




CALL 


TTV 




0E1C 


CD600E 




CALL 


PACK 




0E1F 


B7 




ORA 


A 


f 


0E20 


CAC90E 




JZ 


STOP 




0E23 


58 




MOV 


E, B 


J 


0E24 


CDA80E 




CALL 


TTV 


j 


0E2? 


50 




MOV 


D, B 




0E28 


CDA80E 




CALL 


TTV 


J 


~"=:2B 


CD600E 




CALL 


PACK 


J 


_!2E 


60 




MOV 


H, B 


J 


0E2F 


CDA80E 




CALL 


TTV 


i 


0E32 


50 




MOV 


D, B 


) 



STORE A RET AT THE TTV 
INTERRUTPT ADDRESS-18H 
DISABLE INTERRUPT 
LOAD STACK POINTER 

CLEAR SUM 
CHECK LOCATION. 
GET CHARACTER 
CHECK FOR COLON 
GET NEXT CHARACTER IN NOT 
GET FIRST LENGTH HEX 
SAVE FIRST HEX- 
GET SECOOND LENGTH 
PACK j LENGTH 
STOP IF END 

; STORE LENGTH IN REG E 
; GET 4 HEX ADDRESSES 

GET SECOND HEX 
AND PACK 
MOVE LSB TO H 
GET THIRD HEX 
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0E33 CDR80E 
0E36 CD600E 
0E39 68 
0E3R CDR80E 
0E3D CDR80E 



0E4Q 


CDA80E 


0E43 


50 


0E44 


CDR80E 


0E47 


CD600E 


0E4fl 


70 


0E4B 


22 


0E4C 


ID 


0E4D 


C2400E 


0E50 


CDR80E 


0E53 


50 


0E54 


CDR80E 


0E57 


CD680E 


0E5A 


C27B0E 


I5D 


C3090E 



CALL 


TTV 


CRLL 


PACK 


MOV 


L, B 


CALL 


TTV 


CRLL 


TTV 



i PRCK RND STORE DflTR IN MEMORV 



STORE : 



CRLL 


TTV 


MOV 


D, B 


CRLL 


TTV 


CRLL 


PRCK 


MOV 


M, B 


I NX 


H 


DCR 


E 


JNZ 


STORE 


CRLL 


TTV 


MOV 


D, B 


CALL 


TTV 


CRLL 


PACK 


JNZ 


ERROR 


JMP 


BINLD 



i GET LAST ADDRESb HEX 

; MSB TO L 

.; IGNORE NEXT 

; TWO CHARACTERS 



;RERD 

DflTR 

PACK 

AND 
} STORE IN MEMORV 

i DECREMENT LENGTH 
j GET NEXT CHARACTER 
jRERD SUM CHECK 



HRLT IF ERROR IS DETECTED 
LOOK FOR NEXT FILELINE 



0E6O 


7R 


0E61 


FE2R 


0E63 


CR7B0E 


0E66 


07 


0E67 


07 


0E68 


07 


0E69 


07 


0E6R 


57 


0E6B 


78 


0E6C 


FE3R 


0E6E 


CR7B0E 


0E71 


B2 


0E72 


47 


0E73 


3RD10E 


0E76 


80 


8E77 


32D10E 


0E7R 


C9 



.;PRCK TRKES DRTR IN REG B RND D 

.; AND PACKS INTO REG B 

;REG D CONTAINS MOST SIGNIFICANT HEX 



PACK: 



MOV 


A. D 


CPI 


3AH 


JZ 


ERROR 


RLC 




RLC 




RLC 




RLC 




MOV 


D, A 


MOV 


A, B 


CPI 


3RH 


JZ 


ERROR 


ORA 


D 


MOV 


B, R 


LDA 


CHECK 


ADD 


B 


STA 


CHECK 


RET 





; FIRST HEX TO RCC 

.; CHECK FOR COLON 

.; ERROR IF CPOLON 

i SHIFT 

jLEFT 

;FOUR 

;BITS 

;SRVE HEX 

;GO TO 

; ERROR IF COLON 

jPHCK FIRST HEX. 

j PACKED RESULTS INTO B 

.; COMPUTE CHECK SUM 



> ERROR HALT 

jHALT IF A COLON IS DETECTED IN THE DATH 

jHALT IF AN ERROR IS DETECTED 
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PHGE 3 



0E7B 


0613 


ERROR: MVI B, 13H 


0E7D 


CDD20E 


CfiLL OUTPT 


0E80 


76 


HLT 

; TIMER LORDS DELRV FR 
.: INTERRUPTS RRE NOT U 


0E81 


D301 


TIMER: OUT 1 


0E83 


DB03 


LOOP1: IN 3 


0E85 


B7 


ORR R 


0E86 


C2830E 


JNZ LGOP1 


0E89 


C9 


RET 



STOP TRPE READER 



RND HALT THE LOADER 



Z8A 


FB 


0E8B 


76 


0E8C 


F3 


0E8D 


010900 


0E9O 


3E0D 


0E92 


C39C0E 


0E95 


DB17 


0E97 


BO 


0E98 


OF 


0E99 


47 


0E9A 


3E09 


0E9C 


CD810E 


0E9F 


0D 


0ER0 


C2950E 


0EA3 


78 


0EA4 


E67F 


0EA6 


47 


0EA7 


C9 


0EA8 


CD8A0E 


OEAB 


r" o 


OERC 


FE2F 


OERE 


DAA80E 


0EB1 


FE3A 


0EB3 


DAC50E 


0EB6 


CAC70E 


-<-B9 


FE41 


IBB 


DRR80E 


OEBE 


FE47 


0EC0 


D2R80E 



ACC TO COM TIMMER 
USED — TIME IS IN MS 



TTV READS CHARACTER FROM TTV 

USES SERIAL I/O 

RETURNS ONLV HEX OR COLON 

CONVERTS ASCII TO HEX 

REG C USED FOR BIT COLOUNT 



INPUT: 



L00P2 : 



JUMP3 : 



TTV : 



EI 




HLT 




DI 




LX I 


B, 9 


MVI 


R, 13 


•JMP 


JUMPS 


IN 


17H 


ORA 


B 


RRC 




MOV 


B, R 


MVI 


R.. 9 


CALL 


TIMER 


DCR 


c 


JNZ 


L00P2 


MOV 


R.. B 


AN I 


7FH 


MOV 


B, R 


RET 




CALL 


INPUT 


MOV 


fl.. B 


CPI 


fiiFH 


JC 


TTV 


CPI 


3flH 


■JC 


JUMF'l 


JZ 


JUMP2 


CPI 


41H 


JC 


TTV 


CPI 


47H 


•JNC 


TTV 



SEND TIME 
READ TIME 
TEST TIME 
WATE FOR TIME 



TO COM 
FROM CCM 



ENABLE INTERRUPTS 
RND NATE FOR TTV 
DISRBLE INTERRUPTS 
CLERR B, SET BIT COUNT TO 
SKIP 1. 5 BIT TIMES 

.; INPUT FROM TTV 

;OR BIT INTO BVTE 
. R0 - mTE RIQHT 

.: SRVE BVTE 

.; WRTE FOR 

.: NEXT BIT 

J DECREMENT BIT COUNTER 

.; SRVE CHRRRCTER 
; REMOVE PAR I TV 



GET NEXT CHARACTER 
RETURN CHARACTER TO <-iCC 
IS CHARACTER LESS THEN 
LOOK FOR NEXT CHARACTER 
CHECK FOR TO 9 

JUMP2 IF COLON 
CHECK FOR A 
GET NEXT CHARACTER 
GET NEXT CHARACTER 
IF GREATER THAN F 
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0EC3 C609 




AD I 


9 


0EC5 E60F 


JUMP1 : 


AMI 


0FH 


0EC7 47 


JUMP2 : 


MOV 


B, A 


©ECS C3 




RET 





; CORRECT HEX 

J REMOVE LEFT 4 BITS 



; PROGRAM LOADED CORRECTLY 

; STOP TTY AND JUMP TO PROGRAM 



8EC9 0613 
OECB CDD20E 
8ECE C30W01 
0ED1 



8ED2 
0ED4 
0ED5 
8ED7 
0ED9 
OEDC 
IDD 
OEDF 
8EE0 
OEE1 
0EE2 
0EE5 
0EE7 
8EE9 
0EEB 
OEEE 



8EQ9 

AF 

D317 

3E83 

CD810E 

78 

D317 

0F 

47 

8D 

C2D78E 

3E01 

D317 

3E1C 

CD818E 

C9 



0EEF 31FE0F 
0EF2 21FD8E 
0EF5 16FF 

46 

CDD20E 

2B 

15 

C2F78E 



8EF7 
8EF8 
8EFB 
0EFC 
8EFD 
080y 



STOP : 



CHECK 



MVI 
CALL 
JMP 
DS 



B, 13H 
OUTPT 

100H 

1 



TTY OUTPUT SUBROUTINE 



OUTPT ; 



C, 9 
A 

17H 
A, 9 
T I MER 

A, B 
17H 

B, A 
C 

RT1 
A, 1 
17H 
A, 28 
TIMER 



STOP TTY 

STARTING ADDRESS OF PROGRAM 
CHECK SUM STORAGE 



MVI 

XRA 

OUT 
RT1: MVI 

CALL 

MOV 

OUT 

RRC 

MOV 

DCR 

JNZ 

MVI 

OUT 

MVI 

CALL 

RET 
BINARY DUMP PROGRAM 
PUNCHES BINARY MEMORY IMAGE 
OUTPT ROUTINE PUNCHES BINARY ON TTY 
MEMORY IMAGE IS IN REVERSE ORDER 



SET BIT COUNTER 
CLEAR ACC 
SEND 
SET TIMMER 

DATA TO ACC 
SEND TO TTY 
ROTATE DATA 
SAVE 



SEND MARK 
TO TTY 



DUMP 



L00P3 



ENDPG 



LXI 

LXI 

MVI 

MOV 

CALL 

DCX 

DCR 

■JNZ 

END 



SP, OFFEH .; SET STACK POINTER 
H, ENDPG } START OF DUMP 



D, OFFH 

B, M 

OUTPT 

H 

D 

L00P3 



LENGTH OF DUMP 
LOAD BYTE 
PUNCH BYTE 
DECREMENT ADDRES 
DECREMENT' COUNT 
GET NEXT BYTE 
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MICROCOMPUTER USER'S 

LIBRARY SUBMITTAL FORM Ref No ab 24 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D 4040 Q 8008 Q 8080 




(use additional sheets if necessary) 



To allow for bootstrap loading of programs and for patching of programs 
or data in memory via the teletype. The program uses less than 200 bytes 
of memory and may be placed in ROM or entered manually. 



8080, teletype and interface. 



None. 



The input format is described in comments at the beginning of the program 
listing. 



Code or data may be loaded into any locations in memory. Loading or 
patching of memory locations need not be in sequential order. 



Registers Modified: 
All 



RAM Required: 
x'9D' (157 bytes) 



ROM Required: 
Same as above 



Maximum Subroutine Nesting Level: 

5 



Assembler/Compiler Used: 

MAC 80 



Programmer: 

Jeff Kravi tz 



Company: 

Grumman Data Systems 



Address: 

197 Fairhaven Blvd. 

UnnHh.TV M-Y. 1 1 7Q7 



98-034B 
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i REF. NO. AB24 

; PROGRAM NAME BOOT 



BOOTLOADER & DEBUGGING TOOL FOR INTEL BOSS WITH TELETVPE 



THIS PROGRAM ACCEPTS INPUT FROM THE TTV KEYBOARD OR READ 
IN HEXADECIMAL FORMAT. IT HILL ENTER PROGRAMS np DATA IN 
ANY LOCATION IN MEMORY AND BRANCH TO ANY LOCATION. 

THE FOLLOWING CHARACTERS HAVE SPECIAL MEANING TO THE PRO 

< COLON> INDICATES THAT THE NEXT FOUR HEX DIGITS 
ARE TO BE USED AS THE ADDRESS OF ANY SUB 
DATA TO BE LOADED. THE COLON MAY BE USED 
OF TIMES TO ENTER PATCHES INTO DIFFERENT 
MEMORY OR IF LOADING FROM PAPER TAPE, TO 
SPECIFY THE INTIAL LOAD ADDRESS AND ANY 
ADDRESSES. 

T INDICATES THAT THE INPUT IS COMING FROM 

TAPE, THIS TURNS OFF ECHOING OF CHARACTE 
PRINTER. CTHIS WILL NOT WORK IF THE PROG 
ONLY MEMORV>. IF A PAPER TAPE CONTAINS A 
ITS FIRST CHARACTED, THE TTY WILL NOT EC 
THE T MAY ONLY BE USED AS THE FIRST CHAR 
THE PROGRAM ONLY CHECKS FOR IT ONCE. 



G 



INDICATES THAT THE NEXT FOUR HEX DIGITS 
TO BE USED AS A BRANCH ADDRESS. THE PROG 
BRANCH TO THE SPECIFIED LOCATON. 

INDICATES THAT THE LOADING OR PATCHING 
IS COMPLETED. THE PROGRAM WILL HALT WITH 
ENABLED. 

BLANKS AND CARRIAGE RETURNS MAY BE FREEL 
FOR CONVENIENCE AND READABLTY. CARRIAGE 
WILL ECHO AS CARRIAGE RETURN, LINE FEED. 



A SAMPLE INPUT MIGHT BE AS FOLLOW; 



4-148 



8689 MACRO ASSEMBLER, VI. 



PAGE 2 



0000 21B800 
0Q02 210001 

0006 CD5900 
0Q09 CD6900 
006C 77 
060D 22 

000E C30900 



:0100 A2F4 A245 9786 98 45 0909 4243 Q 0400 

THIS WILL PLACE 'A2E4 A254 ETC. - AT LOCATION 100 

AND THEN BRANCH TO LOCATION 400 <ALL NUMBERS IN HEX> 

ANOTHER EXAMPLE; 

:02O4 F2 :O209 46 :9807 87 X 

THIS WOULD PLACE 'F2' AT 284, "46' AT 299, '87' AT 807 A 

INIT: LXI SP, ENDP+18H i INITIALIZE THE STACK P 



LOOP1 



LXI 

CALL 

CALL 

MOV 

I NX 

JMP 



H, START 

TESTX 

TREAD 

M, A 

H 

LOOP1 



LOAD DEFAULT STARTING 
TEST FOR C'T' <NO ECHO 
READ, TEST, CONVERT, E 
STORE THE BVTE IN MEMO 
INCREMENT THE LOAD ADD 
CONTINUE 



t»«&0 



0011 CD7B00 

0014 E9 



0015 063F 
0017 CD2200 
001A FB 
001B 76 



001C DB71 
901E E6FB 



START EQU 180H ; DEFAULT LOAD ADDRESS 

■ t * GO ROUTINE 
; * 

GO: CALL GETHL t GET H*L FROM TTV 

PCHL ; BRANCH TO USER ADDRESS 



* ERROR ROUTINE 

ERROR: MVI B, "?' i TVPE A QUESTION MARK 

CALL OUTT 
ERR2: 



EI 
HLT 






READ AND ECHO SUBROUTINES 



NOTE THIS PROGRAM ASSUMES THE TTV IS AT 78 AND 71 

THE ADDRESSES IN THE NEXT TWO ROUTINES MUST BE MODIFIED 

, IF THIS IS NOT THE CASE. 

READ IN 71H J READ TTV STATUS BVTES BVTE 

AN I OFFH-TBE ; REMOVE THE 'TRANSMIT BUFFER EMP 
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©028 FE81 
8622 F2150© 
0825 FAi.CS© 
0O2S DE70 
002 A FES© 
©S2C CA±C00 

0621 47 



©022 DB71 
082'1 E6©4 
8026 CA2200 
002S 1 78 
©82A D278 
©02C FE20 
©02E CA1C80 
~*Nl'"i FE©A 
t. -4B CA1CC1© 
©051 FE0D 
©052 C© 
0854 06©A 
©056 C3320© 

0©84 
©08D 

000A 



©859 CD1C8© 
©05C FE54 
885E C26C@© 
©S61 2E0© 
©062 222A0© 

8866 222B8© 
0069 CD1C00 

©06C FE47 
086E CA118© 

. 7 i FE58 
©072 CA1A0© 
©©76 FE2A 



CPI 

JP 

JM 

IN 

CPI 

JZ 

AN I 

MOV 



©1H 
ERROR 
READ 
7©H 

0©H 

READ 
7FH 
B, A 



; TEST FOR DATA AVAILABLE BIT 
i OTHER BITS ON, ERROR FROM TTV 
i DATA NOT VET AVAIL. KEEP TRVING 
,READ A DATA BVTE 
; SKIP BLANK LEADER TAPE 

i TURN OFF "PARI TV-' BIT 

;PUT CHAR IN B FOR ECHO ROUTINE 



.; + 
i * 

.; +++ + 
OUTT : 



NOPE 



ECHO SUBROUTINE 



IN 

AN I 

JZ 

MOV 

OUT 

CPI 

■JZ 

CPI 

JZ 

CPI 

RNZ 

MVI 

JMP 



71H i GET TTV STATUS 

TBE i TEST FOR TRANSMIT BUFFER EMPTV 

OUTT jNOT EMPTV, TEST AGAIN 

A, B ;GET DATA BVTE IN A 
70H ,-OUT THE BVTE 

; TEST FOR A BLANK 

READ ;VES, READ AGAIN 

LF ; TEST FOR A LINE FEED 

READ ;VES READ AGAINE FEED 

CR j TEST FOR CARRIAGE RETURN 
i NO, RETURN TO CALLER 

B, LF j ECHO A LINE FEED 
OUTT 



TBE 

CR 

LF 

.; *++++*>! 

J •+■ 

.: * 

.; * 

TESTX : 



EQU ©4H ; TRANSMIT BUFFER EMPTV 

EQU ©DH ; CARRIAGE RETURN 

EQU ©AH ;LINE FEED 

SPECIAL CHARACTER TESTING ROUTINE 



TREAD : 
TEST : 



CALL 

CPI 

JNZ 

MVI 

STA 

STA 

CALL 

CPI 

JZ 

CPI 

JZ 

CPI 



READ 
CHART 
TEST 
A, NOP I 
NOPE 

NOPE+1 
READ 

CHARG 

GO 

CHARX 

ERR2 

CHARA 



READ A BVTE FROM THE TTV & ECHO 
IS THE THE 'NO ECHO" CHAR? 
NO, CONTINUE 
;NOP THE ECHO ROUTINE 



;READ ANOVHER THER CHARACTER 

; IS THIS THE "GO" CHARACTER 

; VES "GO" 

J IS THIS THE "DONE" CHARACTER 

; VES, HALT 

; IS THIS THE "ADDRESS" CHARACTER 
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i™ - * '3 7" *"■ ! ~- 'ts&TQft 
6075 CDS499 

@ 9 7 F C l > S 4 @ © 



GETHL : 



JN2 

CALL 

MOV 

CALL 

MOV 

RET 



CONV1 
CONV 
H, A 
CONV 
L, A 



;NO TREAT AS HEX DIGIT 

; READ A 4 HEX DIGIT ADDRESS IN P 

i HI ORDER BYTE OF ADDRESS 

i GET LOW ORDER ADDRESS 



9654 



NOP I 

CHART 

CHARG 

QHRRX 

CHARA 



EQU 
EQU 
EQU 
ECU 
EQU 



OOH 
54H 
47H 
5SH 
2AH 



i NOP INSTRUCTION 
J.CT' -NO ECHO-" CHAR 
;C-Q- -GO' - CHAR 
;CX" -DONE" CHAR 
;C-:- -ADDRESS- CHAR 



+ ****•*******•*****'***:♦:**:* r*********^ 



ASCII TO HEX ASSEMBLY ROUTINE 



GGS'i CD1CGO 
00S™ CD?5G'^ 

■" ' OC; ;-;~" 

: _._.c : r ^p 
GGSD CD±C00 



; +■ 

; * 

CONV : 
CONV1 : 



CALL READ 

CALL TLATE 

ADD A 

ADD A 

MOV E, A 

CALL READ 

CALL TLATE 

ORA B 

RET ; RETURN TO CALLER 



;READ A BYTE FROM THE TTY & ECHO 

; TRANSLATE THE BYTE FROM ASCII T 

i SHIFT LEFT 2 

; SHIFT LEFT ANOTHER 2 

;SAVE IN B 

;RERD ANOTHER BYTE 

J TRANSLATE FROM ASCII TO HEX 

; COMBINE TWO HALF BYTES 



6095 D6.S0 
0037 FA15SG 

t?ip(C|f' CO 

009F FA150S 

— ■•■■ ■ *■» l^ W W W 

00A5 CZ1.5G0 
06A9 

000'^ 



; f 

t* ASCII TO HEX TRANSLATION ROUTINE 

.; + 



TLATE ; 



ENDP 



SUI 

JM 

CPI 

RM 

SUI 

JM 

CPI 

RM 

JMP 

EQU 

END 



'0' i SUBTRACT THE LOWEST PERMISSABLE 

ERROR ; TOO LOW, BAD HEX CHAR 

'■9.'_.' x +1 ;TEST FOR A 9 

; BETWEEN ZERO AND NINE, DONE 

-A---0- ; SUBTRACT THE DIFFERENCE TO A 

ERROR ; BETWEEN -©- AND -A-, ERROR 

-F---A-+1 ;TEST FOR HIGHER THAN 'F' 

; BETWEEN -A- AND -F-, OK 

ERROR ; GREATER THAN -F', ERROR 

* 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB25 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 D 4040 □ 8008 H 8080 



(use additional sheets if necessary i 



Octal PROM Programming 
See below 



Standard INTELLEC 8/MOD 80 with teletype 



System Moni tor 



This program accepts sets of 3 octal numbers. The fourth character 
(unless it is a rubout) will cause the BYTES to be placed in memory 
starting at 100H. Any invalid octal character input in the first 
3 positions will cause a carriage return and line feed to be output 
to the teletype and the line to be ignored. Any number of sets may 
be input (up to the practical limit of 100H). Whenever a "bell" 
is typed, the address of the last valid byte on Page 1 will be dis- 
played on the register/flag lights and control will pass to the 
system monitor. To program the PROM, type P100, 1NN,0 where NN 
the HEX number displayed on the lights. 



is 



The program may be tested by inputting 
verifying that the PROM accepted them. 



your choice of octal numbers and 



Registers Modified: 
All 



RAM Required: 



££_ 



ROM Required: 

None 



Maximum Subroutine Nesting Level: 
1 - plus whatever is in CI and CO 



Assembler/Compiler Used: 



iNTEUFr. 8/Mon an vfr. t n 



Programmer: 
Bob Gill 



Company: 



Applied Physics Laboratory 



Address: 



1013 NE 40th 

Seattle. Washington 98195 



98-034B 
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■■ REF. NO. AB 25 

:■ PROGRAM NAME OCTAL PROM PROGRAMMING 



0010 


ORG 


10H 


0010 31F001 


LXI 


SP.. 1F0H 


0013 1600 


MVI 


D, 


0015 210001 


LXI 


H.. 100H 


0018 0600 BB 


MVI 


B, O 


001A 1E00 


MVI 


E, 2-2 


001C CD8O03 AA 


CALL 


380H 


001F 4F 


MOV 


C, A 


£1020 7? 


MOV 


M, A 


0021 CD0938 


CALL 


3809H 


0024 7E 


MOV 


A, M 


0025 E67F 


AN I 


7FH 


0027 FE7F 


CPI 


7FH 


0029 CA5700 


•J2 


CRLF 


32C FE07 


CPI 


07H 


002E CA6400 


JZ 


OUTV 


0031 FE30 


CPI 


30H 


0033 FA5700 


JM 


CRLF 


0036 FE38 


CPI 


38H 


0038 F25700 


JP 


CRLF 


003B E607 


AN I 


j 


003D 80 


ADD 


B 


003E 47 


MOV 


B, A 


003F 7B 


MOV 


A, E 


0040 FE00 


CPI 





0042 CA4E00 


JZ 


FIN 


0045 78 


MOV 


A, B 


0046 07 


RLC 




0047 07 


RLC 




0048 07 


RLC 




0049 47 


MOV 


B, A 


004A 1C 


INR 


E 


004B C31C00 


JMP 


AA 


004E CD0338 FIls 


1 : CALL 


3803H 


0051 E67F 


AN I 


7FH 


0053 78 


MOV 


A, B 


0054 77 


MOV 


M, A 


0055 14 


INR 


D 


0056 23 


I NX 


H 


357 0EOD CRLF: MVI 


C, ODH 


w059 CD0938 


CALL 


3809H 


005C 0EOA 


MVI 


C, OAH 


005E CD0938 


CALL 


3809H 



SET STACK POINTER 

; ZERO # OF BVTES COUNTER 
■• PLACE DATA BEGINNING AT 
••■ ZERO ACCUMULATOR 
.= SET LOOP COUNTER 
.i READ A CHR FROM TTV 

i SAVE IT 
.;ECHO IT 
.: RELOAD CHAR 
.= MASK TO 7 BITS 

; IGNORE LINE IF RUBOUT 

■• IS IT A BELL 

■> GO TO PROGRAMMING PORT I 

i IGNORE LINE IF #<0 

■> IGNORE LINE IF #>7 

; CONVERT ASCII TO BINARV 

> ADD CHAR TO ACCUM 



.: IF LOOP=0, HAVE LOOKED A 



: MULT ACCUM BV 7 

■• INCREMENT LOOP COUNTER 

■ GET 4TH CHAR 
MASK TO 7 BITS 
IF NON-RUBOUT, STORE AC 

INCREMENT # OF BVTES CO 
MOVE ADDRESS POINTTER-G 
OUTPUT CR 



OUTPUT LF 
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0061 C21800 - T MP BE 

0064 7ft OUTV : MOV ft.- D 

0065 3D DCR ft 
ft@££ D~:FF '-"-'T 255 

.;DlSPLftT LftST ADDRESS ON PAGE 1 ON REGISTER/FLAG LIUHTi 

0063 C30038 JMP 28O0H 

0000 END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB26 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D 4040 □ 8008 Q 8080 



(use additional sheets if necessary) 



8080 IDLE Analyzer for Approximating CPU utilizat? 



on 



SJ SP X2 ?™ Un * ° f t,me 808 ° WOu1d have s P ent fn an 'die loop. 
When RUN t. me is compared with Idle time, the percent of CPU 

ut. izat.on can be calculated. Time display is in memory, in 



8080 



Routine to call "IDLE", Routine to restore Registers after 
an interrupt, Routine to call "Time Display" when job is 
complete J 



NONE 



ASCII time, format: 
bIDLEbTIMEbMMbSS.S 

where m = minutes 
s = seconds 



Registers Modified: 
IDLE: A, B, H, L 
Time Display: ALL 



RAM Required: 
16 BYTES (Hex) 



ROM Required: 
99 BYTES (Hex) 



Maximum Subroutine Nesting Level: 
Uses 2 BYTES of stack 
I N/A 



Assembler/Compiler Used: 
8080 MACRO ASSEMBLER 

Ver 1.0 



Programmer: 

J- William McGonigal 



Company: 
Sycor, Inc. 



Address: 

100 Phoenix Drive 

Ann Arhnr HI /.ftlf^ 



98-034B 
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i REF. NO. AB26. 

i PROGRAM 8080 IDLE ANALYZER FOR APPROXIMATING CPI. 



.1 UTILIZATION 



0100 



0100 3A9001 

0103 C600 



IDLE 



8080 IDLE ANALVZER FOR APPROXIMATING 
CPU UTILIZATION 

•J W MCGONIGAL 
MAV 7, 1975 
THE FIRST ROUTINE (.'IDLE::', SHOULD BE CALLED WHENEVER 
THE 8080 lb WAITING FOR AN EVENT < INTERRUPT) TO OCCUR. 

WHEN THE JOB HAS COMPLETED PROCESSING. TALL 
"TIME DISPLAY" (.TIMED::.. IDLE TIME WILL BE STORED IN 
MEMORY, IN ASCII, STARTING RT LOCATION "I TIME" 
MAXIMUM TIME IS 54 MINUTES, 36,7 SECONDS. 
RESOLUTION IS 0.1 SECONDS. 

USER IS RESPONSIBLE FOR SAVING REGISTERS AGTER AN 
INTERRUPT, AND IS ALSO RESPONSIBLE FOR RESTORING THEM 
BEMZiRE AGAIN CALLING "IDLE". NEITHER "IDLE" NfiR 
"TIMED" REQUIRE INITIAL PARAMETERS. STACK POINTER IS 
AbbUMED TO BE PRE-INITIALIZED FOR "TIMED". 



MAY BE AT ANY LOCATION 



ORG 100H 

*+* IDLE ROUTINE *** 

R<A> = 1. 92 MILLISECOND COUNTER 

R<B> = 7. 5 MICROSECOND COUNTER 

R<H, L) = 50 MILLISECOND COUNTER 

OTHER REGISTERS, STACK, AND STACK POINTER ARE 
NEITHER USED NOR MODIFIED. 

*** TIME DISPLAY +++ 

CALLS CLOCK CONVERSION ROUTINE < INCLUDED > 

R<A> = WORK REGISTER 

RCB, C> = MASKS 

R':!D, E> = BINARY COUNTER 

RCH, L> = DATA POINTER 

USES STACK POINTER AND THE STACK 

REQUIRES TWO BYTES OF STACK SPACE 



THIS SECTION MAY BE IN ROM 
LDA FLAG1 .; INITIALIZE 

ADI i ACTIVATE CONDITION FLAGS 
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0105 


C21501 


0108 


3C 


0109 


329001 


010C 


0600 


010E 


210000 


0111 


229101 


0114 


AF 


0115 


04 


0116 


C21501 


0119 


3C 


011A 


FE1A 


011C 


C21501 


011F 


23 


0120 


229101 


0123 


C3FF00 



IDLE1: 



JNZ 


IDLE1 


INR 


A 


STA 


FLAG1 


MVI 


B.. 


LXI 


H, 


SHLD 


BINCT 


XRA 


A 


INR 


B 


JNZ 


IDLE1 


INR 


A 


CPI 


26D 


■JNZ 


IDLE1 


INK 


H 


SHLD 


BINCT 


•IMP 


IDLE -1 



•JUMP IF NOT FIRST PASS 

TURN FLAG ON 

ZERO R<B> 

ZERO RCH, L> 

ZERO THE BINARV COUNTER 

CLEAR THE ACCUMULATOR 

INCREMENT R<B> 

LOOP FOR 1. 92 MILLISECONDS 

I NCREMENT THE ACCUMULATOR 

CHECK FOR 26 PASSES 

LOOP IF NOT 49. 92 MILLISECONDS 



I NCR 
LOOP 



50 MILLISECOND COUNTER 



TIME DISPLAY 



0126 


3E30 


TIMED: 


MVI 


A, "0' 




0128 


219D01 




LXI 


H, IMINT 




012B 


77 




MOV 


M, A 




'.2C 


23 




I NX 


H 




o!2D 


77 




MOV 


M, A 




012E 


23 




INX 


H 




012F 


23 




I NX 


H 




0130 


77 




MOV 


M, A 




0131 


23 




INX 


H 




0132 


1*' f" 




MOV 


M, A 




0133 


*dj£ 




INX 


H 




0134 


23 




INX 


H 




©135 


7? 




MOV 


M, A 








.* 


s 


TART TIME CONVERT 


11 


0136 


2R9101 




LHLD 


BINCT 




0139 


EB 




XCHG 






013A 


219D01 




LXI 


H, IMINT 




013D 


01EO2E 




LXI 


B, 2EE0H 




0140 


CD7701 


TIME1: 


CALL 


CCONV 




0143 


CA4B01 




1? 


TIME2 




€1146 


86 




ADD 


-M 




014? 


77 




MOV 


m, A 




0148 


C34001 




JMP 


TIME1 




014B 


22 


TIME2: 


INX 


H 




014C 


01B004 




LXI 


B.. 04B0H 




014F 


CD7701 


TIME3: 


CALL 


CCONV 




~- , .52 


01C800 




LXI 


Bj 00C8H 




^55 


CD7701 


TIMES: 


CALL 


CCONV 




0158 


CA6001 




•JZ 


TIME6 




015B 


86 




ADD 


M 





i RESET DISPLAY TO ASCII ZERO 

i SET H, L TO TENS OF MINUTES 

; ZERO TENS OF MINUTES 

j BUMP POINTER TO MINUTES 

.: ZERO MINUTES 

i SKIP THE COLON 

i POINT TO TENS OF SECOND 

; ZERO 

.: ZERO SECOND 

,• SKIP THE PERIOD 



UN 



ZERO TENTH OF SECONDS 
J 

GET BINARY TIME 
PUT IN R<0, E> 

SET POINTER TO TENS OF MINUTES 
TENS OF MINUTES MASK 
CALL CLOCK CONVERTER 



JUMP IF NO TENS OF MINUTES 

INCREMENT DISPLAY COUNT 

STORE 

LOOP 

ADVANCE TO MINUTES 

MASK FOR MINUTES 

CALL THE CLOCK CONVERTER 

MASK FOR TENS OF SECONDS 

CALL CLOCK CONVERTED 

JUMP IF NO TENS 
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015C 


77 




MOV 


M, A 


015D 


C35501 




JMP 


TIMES 


0160 


23 


TIME6: 


I NX 


H 


0161 


011400 




LXI 


B, 001 


0164 


CD7701 


TIME7: 


CALL 


CCONV 


0167 


CA6F01 




JZ 


TIMES 


016A 


86 




ADD 


M 


0168 


77 




MOV 


M, A 


016C 


C36401 




JMP 


TIME7 


016F 


23 


TIMES: 


I NX 


H 


0170 


23 




I NX 


H 


0171 


AF 




XRA 


A 


0172 


7B 




MOV 


A, E 


0173 


IF 




RAR 




0174 


86 




ADD 


M 


0175 


77 




MOV 


M, A 


0176 


C9 




RET 





CLOCK CONVERTER 



; INCREMENT DISPLAV COUNT 

; LOOP 

> ADVANCE TO SECONDS 

i MASK FOR SECONDS 

.; CALL CLOCK CONVERTER 

; JUMP IF NO SECONDS 

; INCREMENT DISPLAAVV COUNT 
; LOOP 

.: ADVANCE TO TENTHS OF SECONDS 
.= CLEAR ACCUMULATOR AND THE CARRV 
:■ GET REMAINING BINARV TIME 
; SHIFT OFF HUNDRETHS 

; STORE TENTHS OF SECONDS SECONDS 
J RETURN TO USER 



RETURN: A=0 IF DATA LESS THAN MASK 

A=l IF DATA GR. THAN MASK, ALSO PERFORMS 
SUBTRACTION 

RETURN/ENTER WITH: R<B, C> = 16 BIT MASK 
R<D, E> = 16 BIT DATA 



0177 7A CCONV: 

0178 B8 

0179 DA8401 
017C C28601 
017F 7B 

0180 B9 

0181 D28601 

0184 AF CCON1: 

0185 C9 

0186 AF CC0N2: 

0187 7B 

0188 99 

0189 5F 
018A 7A 
018B 98 
018C 57 
018D AF 
018E 3C 
""L8F C9 



MOV 

CMP 

JC 

JNZ 

MOV 

CMP 

JNC 

XRA 

RET 

XRA 

MOV 

SBB 

MOV 

MOV 

SBB 

MOV 

XRA 

INR 

RET 



A, D 

B 

CCON1 

CC0N2 

A, E 

C 

CC0N2 

A 

A 
A, E 

E, A 
A, D 
B 

D, A 
A 
A 



.: RETURN A=0 IF A LT. B 

i -JUMP TO SUBTRACT IF A GT. B 

i A = B, CHECK LOWER BYTE 

.; JUMP I F A GT. OR EQ. C 

; ZERO THE ACCUMULATOR 

.: RETURN 

; CLEAR A AND CARRV BIT 

.; GET DATA 

.: SUBTRACT MASK 

.:SAVE IT 

j DO UPPER BVTE 

.: STORE I T 

:• ZERO ACCUMULATOR 

;SET A=l 

.; RETURN 



THIS SECTION MUST BE IN RAM AND CAN BE RELOCATED 
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BV AN ORG STAEMENTTEMENT OF INCLUSION WITH OTHER CODE. 



0190 00 FLAG1 : DB 

0191 00 BINCT: DB 

0192 00 C'B 
0192 2049444C I TIME' DB 
0197 45205449 

019B 4D45 

019D 20 I MINT: DB 

019E 20 DB 

019F 20 ISECb: DB 

01AO 20 DB 

01A1 20 I TENTH: DB 

01A2 20 DB 

0000 END 









.; FIRST PASS FLAG 

.; BINARY 50 MILLISECOND COUNTER 

IDLE TIME' ; <MAV BE MODIFIED OR OMITTED!:- 



.; TENS/UNITS OF MINUTES 

.; SPACE 

.; TENS/UNITS OF SECOND^ 

.: PERIOD 

.; TENTHS OF SECONDS 

.; BLANK PADDING 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref ""■ 



AB27 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 Q8080 



(use additional sheets if necessary) 



REAL TIME EXECUTIVE 

PERFORMS PROCESSOR INITIALIZATION, PERIODIC AND DEMAND SCHEDULING, 
ROUTINE TERMINATION, AND WAITS DURING IDLE TIME. 



8080, TIMER THAT CAUSES A PERIODIC INTERRUPT (i.e. Ims), ROM, AND 

RAM 



NONE 



ROUTINE 


PARAMETER 


REGS 


?CLKI 


CLOCK INTERRUPT 





?PERQ 


ROUTINE ADDRESS 
TIME 


D,E 
A 



?INIT 
?DSPC 
?WAIT 
?INTP 



ROUTINE ADDRESS 



D,E 



RESULT 

?CL0K IS INCREMENTED 
S PERIODIC ROUTINES 
MAY BE ADDED TO DIS- 
PATCH QUEUE 
THE PASSED ROUTINE 
IS ADDED TO THE TIME 
QUEUE TO BE ACTIVATED 
AT TIME IN A. 
ADDS ROUTINE TO LIF0 
DISPATCH QUEUE 
EXITS TO NEXT TASK ON 
QUEUE 

WAITS FOR AN INTERRUPT 
(SYSTEM IDLE) 
CLEARS RAM AND SETS 
UP QUEUES AND STACKS 



Registers Modified: 

ALL 


Assembler/Compiler Used: 

8080 MDS MACRO ASSEMBLER -1.0 


RAM Required: 

22 BYTES MIN -J 42 BYTES REC. 


Programmer: 

TED J. CLOWES 


ROM Required: 

0FEH = 254 BYTES 


Company: 

CUBIC CORP. 


Maximum Subroutine Nesting Level: 
2 


Addrw$: 4285 P0NDER0SA 

SAN DIEGO, CA. 92123 



98034b 
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MICROCOMPUTER USER'S 

LIBRARY SUBMITTAL FORM Ref No *™ 



D 4004 D 4040 □ 8008 H 8080 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



Read/write Routines for Interchange Tapes 

Subroutines read and write blocks and characters for any common audio 
cassette recorder. Variable redundancy allows high-speed or highly 
reliable operation. 



8080 with one-chip cassette tape interface 



Self-sufficient 



Block I/O: Specify array address and block length 
Character I/O: Specify word size 



Writer: Recorded cassette tape 
Reader: Blocks of data in memory 



Registers Modified: 
All 



RAM Required: 
User's data 



ROM Required: 
306 bytes 



Assembler/Compiler Used: 
Macro Assembler 



Programmer: 
J.L. Ogdin 






Maximum Subroutine Nesting Level: 
3 



Company: 
Microcomputer Technique, Inc. 



Address: n2 27 Handlebar Road 
Reston, Va. 22091 



9S-034B 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB28 



Program 
Title 

Function 



□ 4004 □ 4040 38008 □ 8080 



(use additional sheets if necessary) 



PROPORTIONAL POWER CONTROL IMAGE BUILDER 

This program builds an "ON-OFF" image in RAM to allow proportional 
power control using zero crossing solid state relays. After an image 
is built using this program, consecutive image words are accessed 
by an interupt routine (not shown here) that causes solid state zero 
crossing relays to turn on and off as the interupt program steps 
through the RAM image. Assuming a 60 Hz line interupt frequency, 
one complete image cycle takes 256/60 = 4. 4 sec. The image 
is built so that power is applied nearly evenly throughout the cycle. 
For example, the most significant value bit controls every other 
word; the next most significant bit in a value word controls every 
other remaining word and so on. Each value word controls one output 
bit stream. The present program is set to take 32 value words 
of 8 bits each, and produce a switching image: 32/8 x 100H = 400H 
locations long to control 4 output ports or 32 relays. 



Registers Modified: 



RAM Required: 
130 -r p (100H) 



ROM Required: 
15 AH 



p = # of ports used 



Maximum Subroutine Nesting Level: 




Assembler/Compiler Used: 
PLM1, PLM2 



Programmer: 

R. Yodlowski/617-890-2000 X494 



Company: 
LFE Corporation 



Address: 



1601 Trapelo Rd. 
Waltham, Mass. 02154 



98-034B 
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00001 

00002 

00003 

00004 

00005 

00006 

00007 

00008 

00009 

00010 

00011 

00012 

00013 

00014 

00015 

00016 

00017 

00018 

00019 

00020 

00021 

00022 

00023 

00024 

00025 

00026 

00027 

00028 

00029 

00030 

00031 

00032 

00033 

00034 

00035 

00036 

00037 

00038 

00039 

00040 

00041 

00042 

00043 

00044 

00045 

00046 

00047 

00048 

00049 

00050 

00051 

00052 

00053 

00054 

00055 

00056 

00057 

00058 

00059 

00060 



/♦REF. NO. AB28 */ 

/♦PROGRAM TITLE PROPORTIONAL POWER CONTROL IMAGE BUILDER */ 

200H: DECLARE VALUE (32) BYTE; 

DECLARE MSBSUSED LITERALLY '7*; 

DECLARE PWRIMBRET ADDRESS; 

/♦ PWRIMB.RK PWRIMB.RY APRIL 9, 1975*/ 

DO; /*****P3WER IMAGE BUILDER****/ 

/* THIS PROGRAM SEGMENT DEVELOPS A BIT-BY-BII RAM IMAGE 
OF THE POWER PATTERNS TO BE APPLIED TO SOLID STATE 
RELAYS TO ACHIEVE SYNCHRONUS SWITCHING PROPORTIONAL 
POWER CONTROL. THE DESIRED POWER LEVELS ARE MADE 
AVAILABLE IN A BYTE VECTOR: VALUE (N) . EACH VALUE 
SPECIFIES THE NUMBER OF ON POWER CYCLES OUT OF A 
POSSIBLE FULL POWER MAXIMUM OF -1*2**(MSB$USED+1 ) 
CYCLES. */ 

DECLARE ( /*POWER IMAGE BUILDER VARIABLES*/ 

STARTOFPORT, /* PDINTS TO 1ST VALUE OF PORTS. */ 
BITSEL, /* SELECTS BITS FROM VALUE BYTES */ 
BITNBR, /* NUMBER OF BIT WITHIN VALUE BYTE */ 
BITSHOLDER, /* HOLDS BITS SELECTED FROM VALUES */ 
PORTNBR, /* NUMBER OF PORT */ 
RLYOFPORT, /* WHICH RLY OF CURRENT PORT */ 
I' /* HOLDER VARIABLE */ 

STRTSCYC, /* CYCLES FROM IMAGE TO START */ 
INCRSCYC) /* 3F CYCLES BETWEEN PATTERNS */ 

BYTE; 

DECLARE CYCSCTR ADDRESS; /* CYCLE COUNT DOWN IN IMAGE*/ 
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00061 


2 


00062 


2 


00063 


2 


00064 


2 


00065 


2 


00066 


2 


00067 


2 


00068 


2 


00069 


3 


00070 


3 


00071 


3 


00J72 


3 


00073 


3 


000/4 


3 


00075 


3 


000/6 


3 


00077 


3 


00078 


4 


00079 


4 


00080 


4 


00081 


4 


00082 


4 


0O083 


4 


00084 


4 


00035 


4 


00086 


4 


00087 


5 


00098 


b 


00089 


5 


00090 


5 


00091 


5 


00092 


5 


00093 


5 


00094 


5 


00095 


5 


00096 


b 


00097 


5 


00098 


4 


00099 


4 


00100 


4 


00101 


4 


00102 


4 


00103 


4 


00104 


4 


00105 


4 


00106 


4 


00107 


4 


00108 


4 


00109 


4 


00110 


4 


001U 


4 


00112 


4 


00113 


4 


00114 


4 


00115 


4 


0011b 


4 


00117 


4 


00118 


4 


00119 


4 


00120 


4 



DECLARE IMAGE (1024) BYTE? 

/* FDR EACH PORT */ 

DO STARTOFPORT = TO LAST(VALUE) BY 8? 

PORIMBR = SHR (STARTOFPURT, 3); 

BITSEL s 1000SO0O0B; 

/* FOR EACH 311 OF VALUE USED */ 
DO BITNBR s J id MSBSUSED; 

BITSHOLDER = o; 

BITSEL = ROL (BITSEL, 1} ; 

/* FOR EACH OUTPUT RELAY OF THE PORT */ 
DO RLYOFPORT = TO 7; 

BITSHOLDER = ROL (BITSHOLDER, 1); 

/* COLLECT THE CQRESP. BITS INTO BIT HOLDER */ 
BITSHOLDER = BITSHOLDER OR (BITSEL 
AND VALUE (STARTOFPORT + 
RLYOFPORT)); 
END; 

/* CORRECT BIT POSITIONS OF BITSHOLDER */ 
IF BITNBR <>0 

THEN BITSHOLDER = ROR (BITSHOLDER, BITNBR); 
/* COMPUTE START CYCLE NUMBER */ 

1=7- MSBSUSED ♦ BITNBR; 
STRTSCYC s SHR (255, I +1); 

/* COMPUTE CYCLE INCREMENT */ 
IF I <> 

THEN INCRSCiC = 1 + SHR (255,1); 
ELSE INCRSCYC = 255; 



/* PLACE BITSHOLDER INTO THE (STRTSCYC) TH IMAGE 
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00121 
00122 
00123 
00124 
00125 
00126 
00127 
00128 
00129 
00130 
00131 
00132 
00133 
00134 
00135 
00136 
00137 
00138 
00139 



4 
4 
4 
4 
4 
4 
5 
5 
4 
4 
3 
3 
2 
2 



AND EVERY (IfJCRSCYC) IMAGES THEREAFTER*/ 
DO CYCSCTR = STRTSCiC TO 255 BY INCRSCYC; 

IMAGE U256*P0RTNBR) + CYCSCTR) = B'IT$HOLDER; 
END; /* PLACEMENT OF BIT$HOLDER */ 
END; /* BITS OF VALUE USED */ 
END; /* PORTS */ 

END; /****POWER IMAGE BUILDER****/ 
GO TO PWR1MBRET; 

EOF; 



NO PROGRAM ERRORS 



4-170 



iny 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. AB29 



□ 4004 □ 4040 [J 8008 □ 8080 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



FLAG PROCESSING ROUTINE 

A Routine for contact closure debouncing and processing 

1. Simultaneously check 8 input flags to find those 
flags which have been present for 3 successive 
iterations of routine. 

2. Report flags identified above. 

3. Clear reported flags that have been serviced. 

4. Remember serviced flags until Input flags are cleared. 

Input Interface (s) to bring in Contact Closures (Flags) 



Routine to assemble up to 8 flags into an 8 bit word 
before each iteration of this routine. 
Routine to recycle thru this routine as frequently- as 
desired. J 



8 bit word at RAM location "Flags" assembled with 
latest State of Contact Closures. 
8 bit word at RAM location "Flags + 4" showing 
actions to be deleted from "Do" list. 



8 bit word at RAM location "Flags +5" showing actions 
to do . This is a normally used output, 
a bit word at RAM locations "Flags + 3" showing 
actions needed. 



Registers Modified : 

ALL 



RAM Required: 

6 bytes 



ROM Required: 

49 bytes 






Maximum Subroutine Nesting Level: 



none 



Assembler/Compiler Used: 

Intellec 8/mode 
Macro assembler Ver 



Programmer: 

B. Weston 



2.0 



Company: 

TRANSC0M INCORPORATED 



Address: 58o Spring streQt 

Windsor Locks, Coram. 06096 



98-034B 
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REF. HO. 
PROGRAM 



AB29 
TITLE 



FLAG PROCESS IMG ROUTINE 



EUT 



INSTRUCTIONS 

1. ASSEMBLE INPUT FLAGS INTO MEMLOC "FLAGS" 

2. "OR" IN FLAGS THAT HAVE BEEN SERVICED 
INTO MEMLOC "FLAGS + *" 

INTO MEMLOC "FLAGS + 4" 

3. RUN ROUTINE 

4. WORD IN MEMLOC "FLAGS + 
POSITION OF FLAGS WHICH 
SERVICED 

5. WORD IN MEMLOC "FLAG + 3" REPORT:! 
POSITION OF FLAGS WHICH HAVE BEEN 
PRESENT FOR 3 OR MORE SUCCESSIVE 
ROUTINE ITERATIONS AND ARE STILL PRESENT 
OR HAVE NOT BEEN REPORTED TO HAVE BEEN 
SERVICE. 



REPORTS 
NEED TO BE 



BIT 



0041 
0141 
002E 



002E 214101 

0031 7E 

0032 47 

0033 2C 

0034 AE 

0035 A6 

0036 4F 

0037 AE 

0038 77 

0039 2C 
003A 73 
003B EEFF 
003D A6 

'"■"53E 57 

J3F 2E45 

0041 7E 

0042 2D 



FLAG 


EQU 


41H 


FLAGS 


EQU 


141H 




ORG 


0O2EH 


i 


FLAG 


PROCESS I NG ROUT I NE 




LXI 


H, FLAGS 




MOV 


A, M 




MOV 


B, A 




INR 


L 




XRA 


M 




ANA 


M 




MOV 


C, A 




XRA 


M 




MOV 


M, A 




INR 


L 




MOV 


A, C 




XRI 


8FFH 




ANA 


M 




MOV 


D, A 




MVI 


L, FLAG+4 




MOV 


A, M 




DCR 


L 



POINTER TO FLAG 

STSORE CURRENT WORD IN A 

AND ALSO IN B 

POINTER TO PAST WORD 

FIND PAST/CURRENT CHANGES 

FIND DELETED FLAGS 

SAVE DELETED FLAGS IN C 

REMOVE DELETED FLAGS FROM 

PAST WORD 

RE -STORE- CORRECTED PAST WORD 

POINTER TO PREVIOUS PAST WORD 

BRING IN DELETED FLAGS 

INVERT 

DELETE FROM PREVIOUS PAST 

WORD 

SAVE RESULT IN D 

POINT TO ACTION TAKEN 

STORE IN A 

POINT TO ACTION NEEDED 
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.: RUN ROUTINE AGAIN, MEMORV WILL BE 
.= CHANGED TQ- 

i F8 F8 F8 7E 08 76 

i REPEAT ROUTINE AGAIN, RESULTING IN- 

i F8 F8 F8 FE 08 F6 

i CONTINUED EXECUTIONS WILL RESULT IN 

.: NO FURTHER CHANGES. 
0000 END 
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INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 H8008 D8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



SOFTWARE STACK ROUTINES FOR 8008 

Subroutines provided for PUSH, POP, and EXCHange A with top of 
stack, and to save processor state on stack in case of an interrupt, 
and to restore it again. 



NONE 



NONE 



E register must be initialized to empty stack (e. g. 255) at beginning 
of main program. 



H and L registers left pointing to top of stack. 



Registers Modified: 

A, (D), E, H, L 



RAM Required: 

4-255 Bytes (for stack) 



ROM Required: 
84 10 Bytes 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

Macro 8 



Programmer: 

Tom Pittman 



Company: 
M" 



icroComputer Consultant 



Address: 

PO 23189 



City: 



San Jose 



State: 



California 95153 



© Intel Corporation, 1976 



98-034D 
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SOFTWARE STACK ROUTINES FOR 8008 

To permit interrupts in a 8008 microcomputer system 
requires either extra hardware for saving and restoring 
the processor status external to the CPU, or two 
dedicated registers, used only in the service of the 
interrupt (for holding the H and L registers, so that 
the processor state may be stored in memory). 

The subroutines presented here are designed to get extra 
mileage out of one of those dedicated registers bv 
designating it as a stack pointer for a stack which may 
be used by the main routine as well as the interrupt 

£ r Ii«>£! U ? 1 ? eB If the SyStem has the a ^itional hardware 
to disable interrupts during the save and restore sequences 
the interrupt service routines themselves may also be * 
lnterruptible, to the maximum subroutine nest depth 
allowed by the main routine and all nested interrupts. 

Two categories of subroutines are presented here. The 
first is a set of subroutines to push, pop, and exchange 
the A register with the top of the stack. These routines 
are re-entrant, and are designed to be callable with a RST 
instruction, though of course they may be placed anywhere 
in memory to be called with the CAL instruction. &nywnere 

The second category consists of the processor state save 
and restore routines, which may be called from or straight 
line coded into the beginning and end of the interrupt 
service routine. These routines are not re-entrant, since 
n«! y J 8e + i he dedicated agisters. If interrupts may be 
nested, they must be disabled during these save and restore 
routines These routines assume ^arbitrary processor 
state, and save/restore the flags, and the A, H and L 
registers in the stack. If it is'desired to'save ?he B and 

SrTfaSjraJS.S? - ^ ^ "" ins ^ ctl °- to do this 

int^! Se + SUbr °/ tlneS * the D ^Sister is dedicated for the 
interrupt save/restore routines, and may not be used for 
any other purpose while interrupts are enabled. The E 
register is designated the stack pointer, and always points 
IV% fi J s t enable empty cell in memory adjacent To 
ihn-iI? P * h ? 3 ^ aCk ' Xt is ass umed that the stack is 

^PA^r?£ ained WltMn a defined pa S e ^ RAM, designated 
PA^rE in the source code; this value is loaded into the H 

7!S + r +l° r a11 Stack °P er ations. All stack operations 
(except the restore sequence) leave the H and L registers 

or'n^VV^ tOP ° f the Stack (l ' e - the i' e - laft pushed 
or next to be popped), to facilitate stack arithmetic. 

fni n ?vi h ? StaCk - fu r tem P° rarv storage effectively compensates 
for the loss of the D and E registers for general programming. 
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.; REF. NO. ADS 

.; PROGRAM NAME SOFT STACK ROUTINE FOR 8898 







.• 


SOFTWARE STACK SUBROUTIN 


0010 




.» 

PAGE SET 


16 


9828 






ORG 


48 


0028 


88 




NOP 




0829 


88 


• ; 


NOP 
STACK PUSH 


< RE-ENTRANT > 


882A 


2618 


PUS 


:H1: mvi 


H, PAGE 


882C 


6B 




MOV 


L, E 


682D 


ID 




DCR 


E 


082E 


I'' l"' 




MOV 


M, A 


882F 


C9 




RET 





8838 


261G 


8832 


6B 


8033 


2C 


8834 


7E 


8835 


5D 


8836 


2C 


8037 


C3 



0038 


2618 


883A 


6B 


803B 


ID 


803C 


77 


003D 


2C 


093E 


7E 


083F 


6B 


9840 


ID 


0841 


77 


8042 


2C 


©043 


7E 


8844 


2C 


"■945 


77 


.46 


2D 


8847 


2D 


8848 


7E 



i. 8888 

PAGE IN RAM OF STACK 
FOR USE AS RST S 



STACK POP < RE-ENTRANT > 



POP1 : 



XCHA 



MVI 


H.. PAGE 


MOV 


L, E 


INR 


L 


MOV 


A, M 


MOV 


E, L 


INR 


L 


RET 




EXCHANGE A WITH ST 


MVI 


H, PAGE 


MOV 


L, E 


DCR 


E 


MOV 


M, A 


INR 


L 


MOV 


A, M 


MOV 


L, E 


DCR 


E 


MOV 


M, A 


INR 


L 


MOV 


JR, M 


INR 


L 


MOV 


M, A 


DCR 


L 


DCR 


L 


MOV 


A, M . 



SET PAGE OF STACK 

GET POINTER 

DECREMENT STACK POINTER 

STORE A IN STACK 



SET PAGE OF STACK 
GET POINTER 
POINT TO STACK TOP 
FETCH IT INTO A 
UPDATE STACK POINTER 
LEAVE L AT STACK TOP 



C RE-ENTRANT > 

SET PAGE OF STACK 

GET POINTER 

DECREMENT STACK POINTER 

SAVE OLD A 

POINT TO OLD TOP 

FETCH IT 

PUSH INTO STACK. 

•CAT NEW TOP> 

RETRIEVE OLD A 

STORE IN OLD TOP 

RECOVER NEW A 
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0049 2C 
004A 5D 
004B 2C 
004C C9 



004D 


55 


00 4 E 


6B 


004F 


5C 


0050 


2610 


0052 


i*' r* 


0053 


3E00 


0055 


CA5F00 


0058 


3EA0 


005A 


FA5FO0 


005D 


3E60 


005F 


IF 


0060 


EA6500 


0063 


F608 


0065 


2D 


- -^g 


77 


- j67 


2D 


0068 


73 


0069 


2D 


0O6A 


l*" cL 


006B 


5D 


006C 


ID 


006D 


C9 



I NTS 



006E 


2610 


0070 


6B 


0071 


2C 


0072 


56 


0073 


2C 


0074 


5E 


0075 


2C 


0076 


7E 


0077 


2C 


0078 


87 


0079 


7E 


O07A 


63 


007B 


5D 


007C 


6A 


0O7D 


C9 



INTR 



INR 


L 


MOV 


E, L 


INR 


L 


RET 




PUSH A, H, L. 


& FLAG 


" : MOV 


D, L 


MOV 


L, E 


MOV 


E, H 


MVI 


H, PAGE 


MOV 


M, A 


MVI 


A, 


JZ 


t+10 


MVI 


A, 160 


JM 


*+5 


MVI 


A, 96 


RAR 




JPE 


$+5 


OR I 


8 


DCR 


L 


MOV 


M, A 


DCR 


L 


MOV 


M, E 


DCR 


L 


MOV 


M.. D 


MOV 


E, L 


DCR 


E 


RET 




POP A, H, L, 


& FLAGS 


MVI 


H, PAGE 


MOV 


L.. E 


INR 


L 


MOV 


D.. M 


INR 


L 


MOV 


E, M 


INR 


L 


MOV 


A, M 


INR 


L 


ADD 


A 


MOV 


A, M 


MOV 


Hj e. 


MOV 


E.. L 


MOV 


L, D 


RET 





DISCARD TEMP CELLS 

AT STACK TOP 

LEAVE L AT STACK TOP 



SAVE L IN (DEDICATED!) D 

GET STACK POINTER 

SAVE H IN E 

SET PAGE OF STACK 

PUSH A 

ENCODE FLAGS: 

ZERO 

NONZERO 

MINUS 

PLUS 

CARRY < SHIFTED IN !> 

EVEN PAR I TV 

ODD PARITY 

PUSH INTO STACK 

NOW PUSH H 

(WAS IN e:> 

*PUSH L* 

^REQUIRED ONLY IF NESTED* 

PUT STACK POINTER 

BACK INTO E 



STACK 



SET PAGE OF STACK 
GET POINTER 

*POP L VALUE INTO D* 
+OMIT IF NOT PUSHED* 
POP H VALUE INTO E 

POP FLAGS INTO A 

SET FLAGS 
POP A FROM STACK 
RE-ARRANGE REGISTERS: 
STACK POINTER TO E FROM L 
H&L FROM E&D 



0000 



END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB30 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 □ 4040 D 8008 □ 8080 



(use additional sheets if necessary) 



Symbol Table List Routine 



This program will print the user's symbols in alphabetical order 
followed by the address the 8008 Macro Assembler has assigned to 
each symbol . 

It can be run after pass 1 of the Assembler. The remaining passes 
it any, can then be run without rerunning pass 1. Either the V2 o' 
or the V2.2 equate statements can be set equal to 1 or to assemble 
the program for use with either version 2. or 2.2 of the Intel lee 8 
Moni tor. 

ASR 33 TTY, teletype interface to Intel lee 8 Mod 8 



Intel lee 8 Assembler and Monitor 



None 



After running pass 1 of the Assembler when this routine is called 
it will print a table of user's symbol addresses in alphabetical * 
order. v 



Registers Modified: 



-ALL 



RAM Required: 
None 



ROM Required: 
177 Bvtes 



Maximum Subroutine Nesting Level: 
k 



Assembler/Compiler Used: 



MAf 8 



Programmer: 

Robert Uleski 



Company: 

Gilford Instrument Labs 



Address: 

132 Artino, Oberlin, OH. kk^lk 



98-034B 
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f REF. NO. AB20. 

; PROGRAM NAME SVMBOL TALBLE LIST ROUTINE 



330O 



ORG 



j30fj!H 



0001 


V20 


EQU 


1.: 


0000 


V22 


EQU 


0; 


2200 CD9522 




CALL 


CRLF 


2202 0E16 




MVI 


C, 22 


2205 CDA922 




CALL 


ELKO; 


2208 218722 




LXI 


H, MSG; 


:<0B 0E0E 


SVM0 : 


MVI 


C, 14 


220D 46 




MOV 


B, M 


220E CDEB2D 




CALL 


INCHL 


2211 CD572C 




CALL 


TTV 


2214 6D 




DCR 


C 


2215 C20D22 




JNZ 


SVMO 


2218 11D01D 


LOOP : 


LXI 


D, 1DD0H. 


221B CD2D22 




CALL 


LGOP0; 


221E CD2D22 




CALL 


LOOP0 


2221 CD2D22 




CALL 


LOOP0 


2224 CD2D22 




CALL 


LOOP© 


2227 CD9522 




CALL 


CRLF 


3S2R C21B22 


LOOP© : 


JMP 


LOOP 


222D 2602 




MVI 


H, D.; 


222F 7B 




MOV 


A, E 


2220 C605 




AD I 


5 


2222 6F 




MOV 


L, A 


2222 7E 




MOV 


A, M 


2224 FE02 




CPI 


02H; 


2226 C24428 




JNZ 


2844H; 






MOV 


L, E 


222A 8E05 


LOOP1 : 


MVI 


C, 5 


,:2C 46 




MOV 


B, M; 


222D CDEB2D 




CALL 


INCHL 


2240 CD572C 




CALL 


TTV 



TRUE FOR MONITOR VER 22. 
TRUE FOR MONITOR VER 2.2 



PRINT THE NUMBER OF BLANKS 

IN REG C 

PRINT "SVMBOL TABLE" 



POINT TO BEGINING OF SVMBOL 
PRINT 4 SVMBOL PER LINE 



PRINT A SVMBOL AND ADDRESS SR 



CHECK FOR USER SVMBOL 

RETURN TO MONITOR AT END OF T 



LOAD AND PRINT LABEL 
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F'RGE 2 



3243 


0D 


3344 


C23C33 


3347 


062© 


3349 


CDEB3D 


334C 


CD573C 


334F 


0620 


3251 


CD573C 


3354 


CDEB3D 


3357 


CD6A33 


335A 


CD9F33 


335D 


CD6A33 


3368 


CD6A33 


3363 


CD8033 


3366 


CDA733 


3369 


C9 


336fl 


7E 


336B 


0F 


336C 


0F 


336D 


0F 


T ;6E 


0F 


S2-€'F 


E60F 


3371 


CD7A33 


3374 


7E 


3375 


E60F 


3377 


C37R33 


337A 


CD8C3C 


337D 


C3573C 



BVTE 



HXD: 



NEX: 

3380 7B 

3381 C608 

3383 5F 

3384 D0 

3385 14 

3386 C9 

3387 53594D42 MSQ : 
338B 4F4C2054 
338F 41424C45 
3393 €iD0R 



DCR 


C 


JNZ 


LOOP1 


MVI 


B, 20H; 


CRLL 


INCHL 


CRLL 


TTV 


MVI 


B, 20H 


CRLL 


TTV 


CRLL 


INCHL 


CRLL 


BVTE; 


CRLL 


DECHL 


CRLL 


BVTE; 


CRLL 


BVTE; 


CALL 


NEX 


CRLL 


BLANK; 


RET 




MOV 


fl, M; 


RRC 




RRC 




RRC 




RRC 




RNI 


OFH 


CRLL 


HXD 


MOV 


A, M 


RNI 


OFH 


IMP 


HXD 


CALL 


CONV; 


JMP 


TTV 


MOV 


R, E; 


AD I 


8 


MOV 


E, A 


RNC 




INR 


D 


RET 





PRINT TWO SPACES 



DB 



PRINT MSB OF ADDRESS 

PRINT LSB OF ADDRESS 
PRINT 6 SPACES 

PRINT A BVTE AS 2 ASCII CHARS 



CALLS MONITOR CONVERT SR 



F.ET D&E TO NEXT SVMBOL 



JVMBOL TABLE .■ CR, LF 



CRLF: 



1:95 06WD 
i:97 CD573C 



MVI 
CALL 



B.. CR; 
TTV 



PRINT CR.- LF 
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339A 


060A 




MVI 


B.. LF 


339C 


C3573C 


DECHL : 


JMP 


TTV 


339F 


2D 




DCR 


L; 


33A0 


2C 




INR 


L 


33A1 


C2A533 




JNZ 


DECL 


33A4 


25 


DECL : 


DCR 


H 


33A5 


2D 




DCR 


L 


33A6 


C9 


BLANK : 


RET 




33A7 


0E06 


BLK0 : 


MVI 


C 6.: 


33A9 


0620 




MVI 


B, 20H 


33AB 


CD573C 




CALL 


TTV 


33AE 


0D 




DCR 


C 


33AF 


C8 




RZ 




33BQ 


C3A933 




JMP 

IF 


BLKO 
V20 


j:C8C 




CONV 


EQU 


3C8CH 


3C57 




TTV 


EQU 


3C57H 


3DEB 




INCHL 


EQU 
END IF 

IF 


3DEBH 
V22 






CONV 


EQU 


3CC1H 






TTV 


EQU 


3C5CH 






INCHL 


EQU 
END IF 


3DF0H 


000D 




CR 


EQIJ 


0DH.: 


000 A 




LF 


EQU 


0AH.: 



DECREMENT H * L SR 



PRINT 6 BLANKS 

PRINT THE NUMBER OF BLANKS IN 



AbCII CARRIAGE RETURN 
ASCII LINE FEED 



0000 



END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref No 



AA6 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameter! 



Output 
Results 



D 4004 D 4040 D 8008 X3 8080 



(use additional sheets if necessary) 



Diagnostic 1003 

To verify that a section of memory is correct by calculating a 
checksum. The checksum is an ordinary 16-bit sum of the 8 -bit bytes 
contained in the storage region examined. 

The routine is explicitly designed to operate entirely in PROM and the 
CPU without ever using RAM. Thus, the stack cannot be used for any- 
thing, including subroutine calls and saving the machine state. 

8080 Chip and ROM Chip. 



None. 



The starting ROM address, the ending ROM address and the location to 
which the routine exits. 



The A register contains zero if the checksum is correct and is non-zero 
otherwise. 



Registers Modified: 


Assembler/Compiler Used: 


All except SP 


8080 Assembler, Version 3.0 


RAM Required: 


Programmer: 


None 


M. J. Gralia 


ROM Required: 


Company: 


43 bytes 


Applied Physics Laboratory 


Maximum Subroutine Nesting Level: 


Address: 


Zero 


Laurel, Maryland 20810 



9*0348 
4-186 



I-.S 8039 MACRO ASSEMBLER, VI. PF(GE ± 



:- REF. NO. AA6 

.: PROGRAM TITLE DIAGNOSTIC 1003 



■> DIAGNOSTIC 1002 

> PURPOSE : 

TO VERIFV THAT A SECTION OF MEMORY IS 
; CORRECT BV CALCULATING A CHECKSUM. THE CHECKSUM 
J IS AN ORDINARV 16-BIT SUM OF THE EIGHT-BIT 
i BVTES CONTAINED IN THE STORAGE REGION EXAMINED 
■ THE ROUTINE IS EXPLICITLY DESIGNED TO 
.'OPERATE IN PROM AND THE CPU WITHOUT EVER USING 
i RAM. THUS, THE bDACK CANNOT BE USED FOR ANYTHING. 
i INCLUDING SUBROUTINE CALLS AND SAVING THE MACHINE' 
.: STATE. 

i INPUTS: 

• : THE ROUTINE IS ENTERED VIA A "JUMP" 

i INSTRUCTION. THE "CALL" INSTRUCTION Ml 1ST NOT BE 

J USED BECAUSE OF ITS ACCESS OF RAM. 

• : THE MEMORV REGION TO BE VALIDATED IS 

.CONTAINED IMPLICITLY WITHIN THE PROGRAM; IT 

i IS SPECIFIED AT ASSEMBLY TIME. 

i A PRE-COMPUTED VALUE FOR THE REGIONS 

i CHECKSUM IS ALSO CONTAINED WITHIN THE CODE. AND 

J FIXED AT ASSEMBLY TIME. 

i OUTPUTS : 

: THE ROUTINE TERMINATES VIA A "JUMP" 

; INbTURCTION. THE "CALL/RETURN" INSTRUCTION COUPLE' 

;MUsT NOT BE USED BECAUSE OF ITS ACCESS TO RAM 

■> UPON RECIEPT OF CONTROL, THE "A" REGISTER 

; IS ZERO IF NO ERRORS WERE DETECTED. 

' THE SP REGISTER IS NOT MODIFIED BV THIS 

; ROUTINE, BUT ALL OTHER REGISTERS AND FLAGS ARE 

J MODIFIED. NOTE: THEY CANNOT BE TEMPORARILY 

> SAVED BECAUSE RAM MUST NOT BE USED 



010B ORG 010BH 



• : DIAGNOSTIC 1003 

i CHECKSUM PROM. DON'T USE RAM 

; INPUTS ALL IMPLICIT 

i OUTPUTS: ONLY A=0 IF NO ERRORS, A=OFH IF ERRORS 
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REGS : 



UTILITY 

MEMORV POINTER 
MEMORV CELL CONTENTS 
CHECKSUM 



010B 210000 

010E 010038 

0111 1600 



0112 3E00 

0115 81 

0116 2EC0 

0118 88 

0119 DA2201 

011C 0A 
011D 5F 
011E 19 

011F 03 

0120 C31201 



0123 
0125 
0126 
0129 
012B 
012C 
012F 

0120 

0133 
0135 

65D4 
2FFF 
2800 

0000 



2E65 

BC 

C22201 

3ED4 

BD 

C23381 

AF 

C30000 

3E0F 
C3008Q 



; A - 

; BC - 
; DE - 
i HL - 

D I 1003: 
; INITIALIZE 

LXI H, 0; -> SUM 
LXI B, START; FIRST MEM 
MVI D^0 
DOWHIL.: 

i DO-WHILE < CURRENT LOCATION* <= <FINI 
MVI A, <<NOT FINISH* AND 8FFH* 
ADD C 

MVI A, <<CNOT FINISH* SHR 8* 
ADC B 
JC DOEND 
SUM + MEMORY <BC* 
LDAX B 
MOV E, A 
DAD D 
BC + 1 
INX B 

JMP DOWHIL 
DOEND: 

} END DO-WHILE 

i IF C EXPECT. NE. SUM* THEN A=0FH ELSE 
MVI A, <. EXPECT SHR 8* 
CMP H 
JNZ THEN 

MVI A, < EXPECT AND 0FFH* 
CMP L 
JNZ THEN 
XRA A 
JMP XXXX 
MVI A, OFH 
JMP XXXX 
PARAMETERS 
EQU 065D4HJ 
EQU 03FFFH; 
EQU 03800H; 
EQU Oj EXIT 



LOC -> MEM PNTR 



;h location* 



;SUM - 
CONT 



BC = 



A=0 



ELSE: 
THEN: 



EXPECT 
FINISH 
START 
XXXX 



EXPECTED CHECKSUM 
LAST MEMORV LOCATION SUMMED 
FIRST MEMORV LOCATION SUMMED 
LOCATION: NEXT ROUTINE 
; AFTER D 1 1002 



0000 



END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AA7 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 D 8008 S 8080 □ 



3000 



(use additional sheets if necessary) 



LIST DEVICE TEST PROGRAM 

Tests selected list device and its interface. 



Minimum system with list device 
CRT is used with enclosed program 



System monitor 



None 



Registers Modified: 

All except H & L 



RAM Required: 

256 x 8 



ROM Required: 

System monitor 



Maximum Subroutine Nesting Level: 
None 



Assembler/Compiler Used: 

8080 MDS Macro Assembler 

Version 1.0 



Programmer: 
Leland B. 



Myers 



Company: 

North Electric Co. 

Paul H. Henson Research Center 



Address: 
Box 20345 

Columbus, Ohio 43220 



98-034C 
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, REF. NO. AA7 

.'PROGRAM TITLE LIST DEVICE TEST PROGRAM 



NORTH ELECTRIC CO. , DELAWARE, OHIO 
PAUL H HENSON RESEARCH CENTER 
L. B. MVERS NOVEMBER 21, 197=1 



000A 

0OF7 
00F6 

0001 



LIST DEVICE TEST PROGRAM 



TAB 


EQU 


OAH 


, LEFT MARGIN 


I NAD 


EQU 


0F7H 


.- CRT 


OUTAD 


EQU 


0F6H 


:■ CRl 


MASK 


EQU 


01H 


:■ CRT 



0O~:0 



ORG 



020H 



...1020 


1E40 




MVI 


E, 04OH 


, 64 LINES. 




0022 


OE1F 




MVI 


C, OlFH 






0034 


O60A 


LOOP1 : 


MVI 


B, TAB 


.= MARGIN. 




8036 


3E20 




MV I 


A, 02OH 






0028 


CD610O 


TABS : 


CALL 


PRINT 






003B 


05 




DCR 


B 






003C 


C22800 




JNZ 


TABS 






002F 


0641 




MVI 


B, 041H 


■■ 65 CHAR'S. 




0041 


79 




MOV 


A, C 






0042 


3C 


LOOP© : 


INR 


A 






0042 


FE60 




CPI 


O60H 






0043 


C24AO0 




JNZ 


CONT 






0048 


2E20 




MVT 


A, 02OH 






004 A 


4F 


OONT : 


MOV 


C, A 






004B 


CD6100 




CALL 


PRINT 






O04E 


©5 




DCR 


B 


• COUNT CHAR'S. 




004F 


C24200 




■JNZ 


LOOP0 






0O52 


3E0D 




MV I 


A, ODH 


; CR 




0054 


CD61O0 




CALL 


PRINT 






0057 


3E0A 




MVI 


A, OAH 


; LF 




0039 


CD61O0 




CALL 


PRINT 






00 5C 


ID 




DCR 


E 


■• COUNT LINES. 




O05D 


C2340O 




JNZ 


LOOP1 






0060 


'_• r 




RST 





FINISHED WHEN 


E=0 


0061 


•J r 


PRINT: 


MOV 


D, A 


SAVE CHAR. 




062 


DBF7 


LOOP : 


IN 


I NAD 






0O64 


E601 




AN I 


MASK 






0066 


CA62O0 




•JZ 


LOOP 


LOOP UNTIL REF 


1DV 
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0869 7A MOV A, D 

006A D2F6 OUT OUT AD ; PRINT CHAR. 

006C C9 RET 

0000 END 
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MICROCOMPUTER USER'S LIBRARY SUBMITTAL FORM Ref. No. A531 



D4004 Q4040 D 8008 IE 8080 



Program 
Title 

Function 



(use additional sheets if necessary) 



Required 
Hardware 



PUNCH BINARY TAPE 

To transfer the contents of a given section of memory to paper tape 
in binary form. 

The paper tape format is that used by DATA I/O and other PROM 
programming devices. 



TTY on Port and 1 

TTY Printer/Punch on output Port 

TTY Printer/Punch status on input Port 1 



Required The program contains the necessary TTY output subroutine. This subroutine 
Software assumes that the data will be inverted between the accumulator output 

and the TTY serial output connector, as in the case of the Intellec 8/M0D 

80 using the imm8-6l INPUT/OUTPUT card. 



Input 
Parameters 



Output 
Results 



Data to be output to paper tape must be stored in consecutive memory 
locations starting at 100 Hex. 

The number of bytes to be punched must be entered in the body of the 

program at location 0031 Hex. 

The default value is 32 decimal or IF Hex. 



The execution of this program will cause a paper tape to be punched 
by the TTY. 

After punching six inches of NULL characters as LEADER the program will 
punch one ASCII "RUBOUT" to indicate that the next tape location eontains 
the first data byte from memory location 100H. The selected number of 
bytes will then be punched on paper tape. After the data has been punched 
the program will cause six Inches of NULL characters to be punched as 
TRAILER. 



Registers Modified: 
A,B,C,H & L 



RAM Required: 

512 Bytes 



ROM Required: 

None 



Maximum Subroutine Nexting Level: 
Zero 



Assembler/Compiler Used: 
Intellec 8/M0D 80 Macro Assembler 



Programmer: 
Robert V. Rea 



Company: 
Atlantic Research Corp. 



Address: 5390 Cherokee Ave. 

Alexandria, Va. 2231^ 
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0010 




ORG 10H 


0010 063C 




MVI B, 60 


0012 0E00 


LEADR : 


MVI C, 00 


0014 DB01 


LOOP1 : 


IN 01 


^16 E604 




AN I 04 


O018 C21400 




JNZ LOOP1 


001B 79 




MOV A, C 


001C 2F 




CMA 



REF. NO. AB31 

PROGRAM TITLE PUNCH BINARV TAPE 



NAME: PUNCH BINARV TAPE 

FUNCTION: PUNCH A BINARV 
TAPE IN FORMAT NEEDED BV 
CERTAIN PROM PROGRAMMERS 

DATA TO BE OUTPUT MUST BE 
STORED IN CONSECUTIVE 
LOCATIONS STARTING AT 100H 

THE NUMBER OF BVTES TO BE 
PUNCHED MUST BE ENTERED IN 
THE BODV OF PROGRAM AT 
LOCATION 0031 
THE DEFAULT VALUE IS 32 
DECIMAL OR IF HEX 

PROGRAM WILL PUNCH SIX 
INCHS OF NULL CHARACTERS 
AND THEN PUNCH ONE ASCII 
RUBOUT CHARACTER IN THE 
TAPE LOCATION IMMEDIATELY 
PRECEDING THE FIRST EIGHT 
BIT BINARV WORD 

AFTER THE SELECTED NUMBER 
OF BVTES HAVE BEEN 
PUNCHED, THE PROGRAM WILL 
PUNCH SIX INCHS OF NULLS 
AS TRAILER AND THEN CAUSE 
THE CPU TO ENTER THE HALT 
STATE 

START AT 10 HEX 

SET B AS NULL COUNTER 
00 HEX = ASCII NULL 
READ TTV STATUS 
TEST TTV STATUS 
LOOP TIL TTV READV 
MOVE C TO A 
COMPLEMENT A 
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001D D380 




OUT 80 


001F 85 




DCR B 


0020 C21200 




JNZ LEADR 


0023 ©EFF 




MVI C, 0FFH 


0025 DB01 


L00P2 : 


IN 01 


8027 E604 




AN I 84 


0029 C22500 




JNZ L00P2 


002C 79 




MOV A, C 


802D 2F 




CMA 


O02E D308 




OUT 00 


0030 061F 


PROM: 


MVI B, 1FH 


0032 08 


SIZE: 


NOP 



0033 218001 




LXI H, 108H 


0036 4E 




MOV CM 


337 DB01 


L00P3 : 


IN 01 


0039 E684 




AN I 84 


003B C23700 




JNZ L00P3 


083E 79 




MOV A, C 


003F 2F 




CMA 


0040 D300 




OUT 00 


0042 23 


PDATA : 


INX H 


0043 4E 




MOV CM 


0044 DBOl 


L00P4 : 


IN 01 


0046 E604 




AN I 04 


0048 C24408 




JNZ L00P4 


004B 79 




MOV A, C 


004C 2F 




CMA 


004D D3O0 




OUT 80 


004F 85 




DCR B 


0050 C24200 




JNZ PDATA 


0053 063C 




MVI B, 60 


0055 0E00 


TRALR : 


MVI C, 00 


0057 DBOl 


LOOPS : 


IN 01 


0859 E604 




AN I 04 


005B C25700 




JNZ LOOPS 


005E 79 




MOV A, C 


35F 2F 




CMA 


4060 D380 




OUT 00 


0062 05 




DCR B 


0063 C2550O 




JNZ TRALR 



OUTPUT A TO TTV 
DECREMENT NULL COUNTER 
LOOP TO LEADR IF NOT 
SIXTV NULLS 

SET C TO ASCII RUBOUT 
READ TTV STATUS 
TEST TTV STATUS 
LOOP TIL TTV READV 
MOVE C TO A 
COMPLEMENT A 
OUTPUT A TO TTV 

SET BVTE COUNTER 

32 BVTE = IF HEX 

64 BVTE = 3F HEX 
128 BVTE » 7F HEX 
256 BVTE = FF HEX 

SET H & L TO 100 HEX 
MOVE MEMORV TO C 
READ TTV STATUS 
TEST TTV STATUS 
LOOP TIL TTV READV 
MOVE C TO A 
COMPLEMENT A 
OUTPUT A TO TTV 

INCREMENT H & L 

MOVE MEMORV TO C 

READ TTV STATUS 

TEST TTV STATUS 

LOOP TIL TTV READV 

MOVE C TO A 

COMPLEMENT A 

OUTPUT A TO TTV 

DECREMENT BVTE COUNTER 

GET ANOTHER CHARACTER 

IF BVTE COUNTER NOT ZERO 



SET B AS NULL COUNTER 
88 HEX = ASCII NULL 
READ TTV STATUS 
TEST TTV STATUS 
LOOP TIL TTV READV 
MOVE C TO A 
COMPLEMENT A 
OUTPUT A TO TTV 
DECREMENT NULL COUNTER 
LOOP TO TRALR IF NOT 



4-197 



I-.S 808© MACRO ASSEMBLER, VI. 



PAGE 2 



0066 76 

0000 



HLT 
END 



i SIXTV NULLS 

;PUT CPU IN HALT STATE 
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Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref No 



AB32 



Q4004 □8008 X&8080 Q 4040 



(use additional sheets if necessary) 



MEMORY COMPARE 

This program extends the version 3.0 monitors functions to include a 
memory to memory compare. The program as written occupies locations 
3000 to 30FF but may be reassembled to occupy any 256 bytes of memory. 



MCS Intellec 8/MOD 80 



Intellec 8/MOD 80 Monitor, Version 3.0, 14 April 1975. 



When started, the program types "C" to show it is active. There are two 
legal inputs that may be entered at this time, "C" or "H". "C" means the 
user wants to compare 256 bytes of memory (The C stands for Chip) . "H" 
means the user wants to compare 4096 bytes of memory (The H stands for 
WHole) . The program then waits for two arguments to be entered. The argu- 
ments are the address at which the comparisons are to begin. If a mistake 
is made, type Rubout and the program will return control to the monitor. 
The arguments may be separated by a space or a comma. 



The output results are similar to the results of the compare memory to 
PROM function as supplied by the monitor. If no differences are found, 
nothing is printed. If differences are found, the first address followed 
by its contents followed by the second address followed by its contents 
are printed. This printout occurs for all locations which do not match. 



Registers Modified: 
ALL (A, B, C, D, E, H, L) 



RAM Required: 

STACK USE ONLY 



ROM Required: 
MAY BE PLACED IN 256 BYTE ROM 



2 ^vels 



Maximum Subroutine Nesting Level: 
Intellec 8/MOD 80 VER 3.0 



Assembler/Compiler Used: 

R. E. Considine 



Programmer: 

SRL MEDICAL, INC. 



Company: 

26/6 Indian Ripple Rd. 

Dayton, Ohio 45440 
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J REF. NO. AB22 

i PROGRAM TITLE MEMORV COMPARE 



TITLE "MEMORV COMPARE ROUTINE' 



2CCD 
2C55 
2F72 
2C52 
2DBF 
2DC7 
2D70 



i MEMORV 


COMPARE 


ROUTINE 


J FOR 8088 




; 10-NOV- 


-75 




CRLF 


EQU 


2CCDH 


CO 


EQU 


2C55H 


TI 


EQU 


2F72H 


BLK 


EQU 


2C53H 


LADR 


EQU 


2DBFH 


LBVTE 


EQU 


2DC7H 


EXPR 


EQU 


2D70H 



2000 



ORG 



2080H 



2000 


CDCD2C 


COMPR : 


CALL 


CRLF 


2902 


0E42 




MVI 


C, 'C 


-">05 


CD552C 




CALL 


CO 


38 


CD722F 




CALL 


TI 


200B 


FE42 




CPI 


'C 


20OD 


CA1D20 




JZ 


PART 


2010 


FE48 




CPI 


'W 


2012 


CA2220 




J2 


WHOLE 


2015 


0E2F 




MVI 


C, '?' 


2017 


CD552C 




CALL 


CO 


201A 


C2002O 




JMP 


COMPR 


201D 


0EO1 


PART: 


MVI 


C,± 


201F 


C22420 




JMP 


HOLE1 


2022 


0E10 


WHOLE : 


MVI 


C, 16 


2024 


C5 


HOLE1 : 


PUSH 


B 


2025 


CD3420 




CALL 


GETPR 


2028 


CD2C28 


H0LE2 : 


CALL 


CM256 


282B 


CI 




POP 


B 


282C 


OD 




DCR 


C 


282D 


C5 




PUSH 


B 


202E 


C22820 




JNZ 


H0LE2 


2021 


C20020 




JMP 


COMPR 


2024 


0EO2 


GETPR : 


MVI 


C, 2 


7*36 


CD702D 




CALL 


EXPR 


S3 


Dl 




POP 


D 


' tfl 


El 




POP 


H 
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202B C9 




RET 




202C 8E00 


CM256 : 


MVI 


C, 


202E C5 


CMLUP : 


PUSH 


B 


302F ?E 




MOV 


A, M 


3040 EB 




XCHG 




2041 46 




MOV 


B, M 


2042 EB 




XCHG 




2042 B8 




CMP 


B 


2044 CA6220 




JZ 


NDIFF 


2047 CDCD2C 


DIFF: 


CALL 


CRLF 


204A CDBF2D 




CALL 


LADR 


304D CD523C 




CALL 


BLK 


2050 7E 




MOV 


A, M 


2051 CDC72D 




CALL 


LBVTE 


2054 CD522C 




CALL 


BLK 


2057 EB 




XCHG 




2058 CDBF2D 




CALL 


LADR 


205B CD522C 




CALL 


BLK 


205E 7E 




MOV 


A/M 


385F CDC72D 




CALL 


LBVTE 


2062 EB 




XCHG 




2062 22 


NDIFF: 


I NX 


H 


?^64 EB 




XCHG 




. J5 22 




I NX 


H 


3066 EB 




XCHG 




2067 CI 




POP 


B 


2068 9C 




INR 


C 


2069 C22E20 




JN2 


CMLUP 


206C C9 




RET 





0000 



END 
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MICROCOMPUTER 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AA8 



G 4004 D 4040 D 8008 XI 8080 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



TRACE 



Provide a program debug trace facility by dumping the address 
of the calling location and the contents of the registers. 



TTY on ports and 1. 



The routine calls four TTY utilities in the monitor. However, 
they are very short and could be included when the monitor is 
not available. 

All of the registers and the first location of the stack(return 
address). 



A header description line and the dump below. For example, if 
trace were called from location 100H the console output would 
be: 

*T* A F B C D E H L M SP 
0103 0A02 1B23 0001 5678 0101 0088 

Note that the return address is three greater than the calling 
location and that the M reference is considered 2 bytes. 



Registers Modified: 

None 



RAM Required: 

66 bytes 



ROM Required : 

None 



Maximum Subroutine Nesting Level: 

None 



Assembler/Compiler Used: 

Intel lee 8 macro assembler 



Programmer: 

Lome Douglas 



Company: 

Tel aid Systems 



Address: 

6725 Variel ,Canoga Park, Cal ,91303 



98-034B 
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3C53 




BLK 


EQU 


3C53H 


3CCD 




CRLF 


EQU 


3CCDH 


3C55 




CO 


EQU 


3C55H 


3DC7 




LBVTE 


EQU 


3DC7H 


07E0 




J 


ORG 


07E0H 


07E0 




HEAD 


EQU 


* 


07E0 


2A542A20 




DB 


•'*T* 


07E4 


20412046 








7E8 


20204220 








j?EC 


43202044 








07F0 


20452020 




DB 


' E !• 


87F4 


48204C20 









REF. NO. AA8 
PROGRAM TITLE TRACE 



************* 

* * TRACE * * 
************* 

THIS ROUTINE DUMPS THE ADDRESS OF 
THE CALLING LOCATION & THE VALUES 
OF THE REGISTERS. IT IS INTENDED 
A DEBUGGING AID POSSIBLV STORED 
IN PROM. 



UPON ENTRV ALL OF THE VALUES TO BE 
DUMPED ARE PUSHED INTO THE STACK 
THE HEADER IS THEN PRINTED AND THE 
ACTUAL VALUES ARE TAKEN FROM THE 
STACK. ALL REGISTERS ARE THEN 
RESTORED AND CONTROL IS RETURNED. 

THIS VERSION WAS INTENDED FOR USE 
WITH AN INTELLEC 8/MOD. 80 WITH 
MONITOR VERSION 3. 0. THE FORMAT OF 
THE DISPLAV WAS DESIGNED FOR USE 
WITH A CRT WHICH HAS A PRINT LINE 
OF 40 CHR. 

THE FOLLOWING ARE MONITOR UTILITIES 
THAT WRITE TO THE CONSOLE, IF USING 
A DIFFERENT MONITOR CHANGE TO 
APPROPRIATE ADDRESSES. 



WRITE BLANK 
END OF LINE 
WRITE 1 CHR 
WRITE HEX BVTE 



i HEADER 
A F B C 0" 



H L M 
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PRuE 2 



07F8 204D2020 
07FC 20205350 
0020 



TITCH EQU *-HERD 



0800 


TRRCE EQU 


* 


* ENTRV 


0800 


F5 


PUSH 


PSW 


THE DRTR TO BE 


0801 


C5 


PUSH 


B 


DISPLRVED IS RLL 


0802 


D5 


PUSH 


D 


PUSHED INTO THE 


0803 


E5 


PUSH 


H 


STRCK IN THE 


0804 


46 


MOV 


B, M 


ORDER OF THE DUMP 


0805 


22 


I NX 


H 


M IS CONSIDERED R 


0806 


4E 


MOV 


CM 


, 16 BIT LOCATION 


0807 


C5 


PUSH 


B 




0808 


210C00 


LXI 


H, 00CH 


; STACK VRLUE PRIOR 


0S0B 


39 


DRD 


SP 


; TO TRRCE CRLL 


080C 


E5 


PUSH 


H 




080D 


2B 


DCX 


H 


s CRLLINQ RDDR 


080E 


E5 


PUSH 


H 


; SRVE FOR DUMP 



080F 0620 
0811 21E007 

0814 4E 

0815 CD553C 

0818 05 

0819 CA2008 
081C 23 
081D C31408 



NOW DUMP THE TRACE TITLE LINE 



LOOP: 



MVI 6, TITCH ; NUMBER OF CHR 
LXI H, HEAD ; CHR STRING 



MOV C, M 
CALL CO 
DCR B 
J2 DONE 
INX H 
JMP LOOP 



PICK UP CHR 
PRINT IT 
SEE IF DONE 

ADDR OF NEXT CHR 



DONE: 



0820 CDCD3C 



0823 El 



CALL CRLF 



NEXT LINE 



0824 
0826 
0827 
0828 
082B 
32C 
482D 
0838 
0831 



0607 

C5 

7E 

CDC72D 

2B 

7E 

CDC73D 

2B 

CD533C 



NOW THAT THE TITLE IS PRINTED ITS 
TIME TO DUMP THE DATA IN THE STACK 
POP H i RESTORE POINTER 



L00P2 : 



MVI 


B,7 


# BVTE PAIRS 


PUSH 


B 


SAVE COUNT 


MOV 


A, M 


PICK UP FIRST 1 


CALL 


LBVTE 


& DUMP IT 


DCX 


H 


NEXT 1 


MOV 


A;M 




CALL 


LBVTE 




DCX 


H 


; 4 NEXT TIME 


CALL 


BLK 


; PRINT BLANK 
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0824 CI 

0835 85 

0836 C22608 
0839 CDCD3C 



083C El 
083D El 

083E El 
883F Dl 

0840 CI 

0841 Fl 

0842 C9 



0280 
0200 

0202 
0205 
0208 
O20B 
020E 
0211 



3E0fl 
012C1B 
114E2D 
217856 

310001 

CD0008 
CD0808 



0214 C30000 



0000 



POP B 
DCR B 
JNZ L00P2 
CALL CRLF 



i LOOP COUNT 
; TEST IF DONE 



NEW LINE 



ALL DONE NOW RESTPRE REGISTERS 
AND EXIT 



POP H 

POP H 

POP H 

POP D 

POP B 

POP PSW 
RET 



THESE 2 SVNC TO 
THE TRUE H 

RESTORE 'M 



** AD I OS ** 



* * * THAT'S ALL FOLKS * * * 



TEST TEST TEST TEST TEST TEST TEST 
**** **** **** **** ***% **%* **** 



ORG 


200H 


MVI 


A, OAH 


LXI 


B, 1B2CH 


LXI 


D, 3D4EH 


LXI 


H, 5678H 


LXI 


SP, 0100H 


CALL 


TRACE 


CALL 


TRACE 



JMP 

} 

END 
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Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 D 4040 □ 8008 *H 8080 D 3000 



(use additional sheets if necessary) 



Handler for Tally paper tape punch 

The program TALLY is a handler that interfaces to the 8080 monitor. The 
Tally punch requires a 4.5 msec drive pulse and has a maximum punch rate 
of 60 cps. To obtain the long drive pulse the step line of the Tally was 
wired to the drive direction line of the MDS. The Tally punch has high 
true logic which requires software inversion of the signals. On entry to 
the subroutine the C register contains the data to be punched. The data is 
output to device F8H. The drive bit (bit 4) on device F9H is set and a 
4.5 msec time delay is generated. The drive bit is removed and a 12.2 msec 
delay is genereated. The data lines are cleared and a return is made. The 
PSW, and B register pairs are saved on entry and restored before return. 

Tally model PD-420 paper tape punch and MDS-800 

MDS-800 monitor 



C register contains data to be punched 



Punch on paper tape 



Registers Modified: 

None 



RAM Required: 

2DH bytes 



ROM Required: 

None 



Maximum Subroutine Nesting Level: 

None 



Assembler/Compiler Used: 

Intellec MDS Assembler Ver 1.0 



Programmer: 

S. Graf 



Company: 

Sentrol Systems Ltd. 



Address: 



4401 Steeles Avenue West 
Toronto, Ontario M3N 2S4 

CANADA 



98-034C 

4-208 
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; REF. NO. AC10 
PROGRAM TITLE HANDLER FOR TALLV FTP 



TALLV PUNCH HANDLER 



TALLV : 



0000 


F5 




PUSH 


PSW 


.; SAVE 


0001 


C5 




PUSH 


B 




0002 


79 




MOV 


A, C 




0003 


2F 




CMA 




i POSITIVE TRUE 


0004 


D3F8 




OUT 


0F8H 


; OUTPUT DATA 


0006 


AF 




XRA 


A 


i CLEAR A 


0007 


D3F9 




OUT 


0F9H 


;SET DRIVE BIT 


0009 


0602 




MVI 


B, 2 




000B 


3EFF 


UP1: 


MVI 


A, 0FFH 




000D 


3D 


UP2: 


DCR 


A 


; DELAV 4. 5 MS 


000E 


C20D00 




JN2 


UP2 




?11 


05 




DCR 


B 




tf012 


C20B00 




JNZ 


UP1 




0015 


3E10 




MVI 


A, 10H 


i REMOVE DRIVE BIT 


0017 


D3F9 




OUT 


0F9H 




0019 


0607 




MVI 


B, 7 




001B 


3EFF 


UP3: 


MVI 


A, 0FFH 


.: DELAV (16. 7-4. 5> 


001D 


3D 


UP4: 


DCR 


A 




001E 


C21D00 




JNZ 


UP4 




0021 


05 




DCR 


B 




0022 


C21B00 




JNZ 


UP3 




0025 


3EFF 




MVI 


A, 0FFH 




0027 


D3F8 




OUT 


0F8H 


J CLEAR DATA LINES 


0O29 


CI 




POP 


B 


> RESTORE 


002A 


Fl 




POP 


PSW 




0828 


C9 




RET 







0000 



END 



intel 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB33 



D 4004 D 4040 D 8008 8080 □ 3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



CRCC-16 

This program generates a 2-byte cyclic redundancy 
check character, obtained as remainder of the division 
of the serial data stream by a selected polynomial. 
This character is stored in register pair B (most sig- 
nificant byte) and C. 



8 251 as input device. 



None 



The selected polynomial is given in the form of two 
constants stored in instructions 410 and 480. The 
selected polynomial for this case is 
x 16 + x 15 + x 2 + 1 

coming as constants 01000000B, and 00000001B, respect- 



ively. Any polynomial of type 16 



l 
+ I i 

i=15 



■ x 1 + l 



(the a's being boolean), has to be introduced as the 
sequences of bits a lt a ? ,...a 7 , and a 8 , a9,...,a 15 
as immediate fields of instructions 4 10 and 480 
respectively. 

Registers B and C store the check character. After the 
read-out of one block of data followed by this character, 
the content of B £ C has to be 0. 



Registers Modified: 

A,B,C,D,E 



RAM Required: 





ROM Required: 

40 bytes 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

80 80 Macroassembler 



Programmer: 

M. Nobile 



Company: 



Address: 



Honeywell Information 
Systems Italia 

1-20010 Pregnana 
Milanese, Italy 



98-034C 
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i REF. NO. AB33 
PROGRAM TITLE CRCC-16 



THIS PROGRAM GEREATES A TWO BYTE CYCLIC 

REDUNDANCY CHECK CHARACTER, OBTAINED AS REMAINDER 

OF THE DIVISION OF THE SERIAL DATA STREAM BY A 

SELECTED POLYNOMIAL 

THE DATA STREAM ISSREAD BYTE AFTER BYTE THROUGH 

INPUT DEVICE #0 ASSUMED TO BE AN 8251 

THE CRCC IS STORED IN REGISTER PAIR B (MORE 

SIGNIFICANT BYTE> AND C <L. S BYTE> 

THE SELECTED POLYNOMIAL IS GIVEN IN THE FORM OF 

IMMEDIATE CONSTANTS STORED IN INSTRUCTIONS 

410 AND 480 

THE PRESENT PROGRAM SELECTS POLYNOMIAL 

X**lg + X**15 + X**2 + 1 
COMING AS CONSTANTS 40H AND 01H 
ANY POLYNOMIAL OF TYPE 

X**16 + A<15>*X**15 + . . . . + A<1>*X +1 
THE A'S BEING BOOLEAN, HAS TO BE INTRODUCED AS TWO 
CONSTANTS, NAMELY THE SEQUENCE OF BINARY DIGITS 

A<1>, A<2>, , A<7>, AND THE SEQUENCE 

OF BINARY DIGITS A<8>, A<9>, ... , A<15> AS 
IMMEDIATE FIELD OF INSTRUCTIONS 
410 AND 480 RESPECTIVELY. 



0100 




ORG 


100H 


0100 


010000 


LXI 


B, 0H 


0103 


DB00 Wl 


IN 


OH 


0105 


1E08 


MVI 


E, 8H 


0107 


57 BITF: MOV 


D, A 


0108 


A9 


XRA 


C 


0109 


IF 


RAR 




010A 


78 


MOV 


A, B 


010B 


D22101 


JNC 


BITO 


010E 


EE40 


XRI 


40H 


0110 


37 


STC 




0111 


IF 


RAR 




0112 


47 


MOV 


B, A 


112 
,414 


79 


MOV 


A, C 


IF 


RAR 




0115 


EE01 


XRI 


01H 



; INITIALIZATION - CLEAR B AND C 

i INPUT DATA 

;SET BYTE COUNTER 

J CHECK BIT CALCULUS 



; CONDITIONAL JUMP ON CHECK BIT 

j UPDATING DUE TO THE CHOSEN POLYNOM 

i IN MS BYTE CRC REGISTER <B> 



; UPDATING DUE TO THE CHOSEN POLYNOM 
i IN LS BYTE CRC REGISTER <C> 
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0117 
0118 
0119 
011fl 
011B 
011E 
0121 
0122 
0123 
0124 
0125 

0000 



4F 

7A 

IF 

ID 

C20701 

C30301 

IF 

47 

79 

IF 

C31701 



BITE 



BITO: 



MOV 


C, A 


MOV 


A, D 


RAR 




DCR 


E 


JNZ 


BITF 


JMP 


141 


RAR 




MOV 


B, A 


MOV 


A, C 


RAR 




JMP 


BITE 


END 





; TO NEU DATA BIT 

;TO NEW DATA BVTE 

; SUBROUTINE ENTRV FOR CHECK BIT 



4-214 



iny 



MICROCOMPUTER USER'S 
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ACll 



D 4004 □ 4040 □ 8008 XX8080 D3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Intellec MDS to TI Silent 700 Interface 

To interface a Ti Silent 700 Terminal with magnetic 
tape cassettes to an Intellec MDS and permit both the 
printer and cassettes to run at 30 characters per second 
speed. Both hardware and software modifications are 
required to the MDS and hardware changes are required 
for the TI Silent 700. 

Intellec MDS 

One (1) MDS-406 6K PROM board 

Nine (9) 170 2A PROMs 

TI Silent 700 ASR Terminal with current loop interface 

UPP PROM Programmer or equivalent capability 

MDS Monitor Version 1 or Version 2 
MDS Boot PROM VI. or VI. 1 



Output 
Results 



Revised 8/8/77 



Program Listing Available Only. 
Paper Tape is not offered. 



8/8/77 







Registers Modified: 


Assembler/Compiler Used: 


RAM Required: 


Programmer: 

Richard Lonchar 


ROM Required: 


Company: North Electric Co. 


Maximum Subroutine Nesting Level: 


Address: P.O. Box 2034b 

Columbus, Ohio 43220 




98-034C 
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LIBRARY SUBMITTAL FORM *t. no. 



AB34 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Result* 
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(use additional sheets if necessary) 



COMPARE 

This program reads a HEX format tape and compares it to the 
corresponding memory locations. When the two don't match, the 
address is printed on the system console. 
Included are three options: 

1. Print contents of tape & addr. 

2. Skip if address was originally 0. 

3. Restore memory to original value. 

8080 



Several utility routines available in the MCS 80 monitor were called 
These could be substituted or rewritten for use on other systems 
(see listing). 

HEX format tape in reader. 



The program lists all locations that have been modified and, optionally, 
the original and modified values. Also, optionally, the program may 
restore the modified locations to the original value 



Registers Modified: 

A,B,C,H,L 



RAM Required: 

16 BYTES 



ROM Required: 

113 BYTES (can be in RAM) 



Maximum Subroutine Nesting Level: 

16 BYTES IN STACK 



Assembler/Compiler Used: 

Intel lee 8 Macro Assembler 



Programmer: 

LORNE DOUGLAS 



Company: 

TELAID SYSTEMS, INC. 



Address: 6725 VaHel Avenue 

Canoga Park, Calif. 91303 



98-034C 
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0000 
0001 



REF. NO. AB34 
PROGRAM TITLE COMPARE 



************************************* 

* COMPARE * 

************************************* 

THIS PROGRAM READS A HEX FORMAT TAPE 
AND COMPARES IT TO THE CORRESPONDING 
MEMORV LOCATIONS. WHEN THE TWO DON'T 
MATCH THE ADDRESS IS PRINTED ON THE 
SVSTEM CONSOLE. 



NO 
VES 



EQU 
EQU 





1 



INCLUDED ARE THREE OPTIONS: 



1 PRINT CONTENTS OF TAPE & ADDR. 

2 SKIP IF ADDR WAS ORIGINALLV 0. 

3 RESTORE MEM TO ORIGINAL VALUE. 



0001 


PRNTM 


SET 


VES 


0001 


SKIPM 


SET 


VES 


0001 


RSTRM 


SET 


VES 



THE BULK OF THIS PROGRAM IS AN EXACT 
COPV OF THE MONITOR READ ROUTINE. IT 
WAS ASSEMBLED FOR USE ON AN INTELLEC 
8 MOD 80 RUNNING ON VERSION 4. THERE 
ARE SEVERAL MONITOR UTILITIES CALLED 
THAT COULD BE SUBSTITUTED FOR USE ON 
OTHER SVSTEMS. 



3D70 


EXPR 


EQU 


3D70H 


i GET OFFSET ADDR 


3EFF 


RIX 


EQU 


3EFFH 


i GET CHR FROM READR 


3C82 


BVTE 


EQU 


3C82H 


;READ TWO ASCII CHR 
; DECODE TO BINARV 


755 


CO 


EQU 


3C55H 


; PRINT CHR IN C 


->C53 


BLK 


EQU 


3C53H 


J PRINT BLANK 


3CCD 


EOL 


EQU 


3CCDH 


; PRINT CR LF 


3DBF 


LADR 


EQU 


3DBFH 


; PRINT ADDR IN H&L 
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3DC7 

386B 
3C43 



LBVTE EQU 3DC7H 



START EQU 
LER EQU 



; CONVERT 1 BINARV 
; BYTE TO HEX & PRT 
386BH ; MONITOR RESTART 
3C43H ; ERROR RETURN 



0300 



0300 


0D 


0301 


CD703D 


03O4 


El 


0305 


E5 


0306 


CDFF3E 


0309 


063A 


03OB 


90 


030C 


C20403 


030F 


57 


310 


CD823C 


0313 


CA6003 


0316 


5F 


0317 


CD823C 


031A 


F5 


031B 


CD823C 


031E 


CI 


031F 


4F 


0320 


09 


0321 


CD823C 


0324 


CD823C 



0327 B7 

0328 CA5283 



032B F5 
*32D CA500JS 



READ: 



REDO: 



RED1: 



ORG 300H 



DCR C 
CALL EXPR 



POP 
PUSH 



H 
H 



CALL RIX 



MVI 

SUB 

JNZ 

MOV 

CALL 

JZ 

MOV 



B, ' :' 

B 

REDO 

D, A 
BVTE 
RED2 

E, A 



CALL BVTE 

PUSH PSW 

CALL BVTE 

POP B 



MOV 
DAD 



C, A 
B 



CALL BVTE 
CALL BVTE 



; GET ONE ADDR 



; GET BIAS ADDR 



SCAN TO REC MRK 
CLEAR CHECKSUM 

ZERO RECORD L 
LENGTH ALL DONE 
EORECDRD LENGTH 
MSB OF LOAD ADR 
SAVE IT 

LSB OF LOAD ADR 
RETV MSB PUT IN B 



BIAS + LOAD 
RECORD TVPE 



-> HL 



** COMPARE INSERT ******************** 



IF SKIPM 

ORA A 

JZ END IT 

END IF 

PUSH PSW 

SUB M 

JZ POP IT 



i TEST TO SEE IF 
; AND EXIT 



i SAVE BVTE FROM TAP 
i *TEST* IF MATCH 
; IF SO ADIOS 



;THIS CODE IS EXECUTED IF THE LOCATION 
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J HAS CHANGED 



O330 


CDCD3C 




CALL 


EOL 


0333 


CDBF3D 


IF 


CALL 
PRNTM 


LADR 


0336 


CD533C 




CALL 


BLK 


0339 


0E54 




MVI 


C, 'T 


033B 


CD553C 




CALL 


CO 


033E 


Fl 




POP 


PSW 


033F 


F5 




PUSH 


PSW 


0340 


4F 




MOV 


C, A 


0341 


CDC73D 




CALL 


LBVTE 


0344 


CD533C 




CALL 


BLK 


0347 


0E4D 




MVI 


C, 'M' 


0349 


CD553C 




CALL 


CO 


034C 


7E 




MOV 


A, M 


034D 


CDC73D 




CALL 
END IF 


LBVTE 


0350 


Fl 


POPIT: 
IF 


POP 
RSTRM 


PSW 


351 


77 




MOV 
ENDIF 


M, A 



> START A NEW LINE 
s PRINT LOCATION 

i PRINT A BLANK 
PRINT A '1" TO 
IDENTIFY TAPE 
GET BACK THE CHR 
FROM THE TAPE 
AND PRINT IT 

PRINT A BLANK 
PRINT 'W FOR 

MEMORV 
PRINT THE CONTENT! 

OF MEMORV 



i CHR FROM TAPE 
J RESTORE VALUE 



0352 23 

0353 ID 

0354 C22403 
0357 CD823C 
035A C2433C 
035D C30403 



END IT 



+* END INSERT ***+•****++***+********** 



INX H 

DCR E 

JNZ RED1 

CALL BVTE 

JNZ LER 

JMP REDO 



LOOP UNTIL DONE 
READ CHECKSUM 
CHECKSUM ERROR 
ANOTHER RECORD 



RED2: 



0360 CD823C 



0363 67 

0364 CD823C 

0367 6F 

0368 B4 
369 CA6D03 

tf_<6C E9 

036D El 



RED3 ; 



CALL 


BVTE 


.= GET MSB TRANSFER 
; ADDRESS 


MOV 


H, A 




CALL 


BVTE 




MOV 


L, A 




ORA 


H 




JZ 


RED3 




PCHL 







POP 



H 
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LIBRARY SUBMITTAL FORM 



Ref. No. 



AB36 



D4004 D4040 □ 8008 $8080 



Program 
Title 

Function 



(use additional sheets if necessary) 



Required 
Hardware 



INPUT and OUTPUT COMMANDS FOR INTELLEC/MDS 

These two pseudo monitor commands allow the user to «ain 

Sa?rcan C Se fc reL°^L M jr "* l™" P ° rtS ln th « «» W«. 
Data can be read Into the console using the "I" command; data 
can be sent out using the "0" command. command, aara 



Standard MDS system with console. 



Required 
Software 



Input 
Parameters 



INTELLEC/MDS Monitor Version 1.0, resident on Prom. 



Letter I or from console input and data: 

<I><P0RT NUMBER> (CONSOLE RETURNS INPUT PORT DATA) 
<0><PORT NUMBER>, <DATA TO BE OUTPUTTED> 



Output 
Results 



iSput port!"* 1 PrintS ° n the console the valu « of «*• chosen 
output"™?* CaU8eS the Ch ° 80n data Value t0 be sent to tne 



Registers Modified: 



RAM Required: 



3 BYTES 



ROM Required: 



41 (decimal) BYTES 






Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

Intellec 80 MACRO Assembler 



Programmer: 

Paul 0. St. Amand 



Company: 



Bell Telephone Labs 



Address: Room 3E-25 



JifX 



980346 
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0010 

F700 



F760 



REF. NO. AB36 

PROGRAM TITLE INPUT & OUTPUT COMMANDS FOR MDS 



PAUL G. bT. AMAND BELL TELEPHONE LABS 24 JAN 76 
ADDITIONAL MONITOR COMMANDS FOR INTELLEC/MDS SVSTEM 

THIS ROUTINE ALLOWS THE USER TO GAIN ACCESS TO THE INPUT AND 
PORTS OF HIS MDb SVSTEM.. THROUGH USE OF TWO MONITOR-LIKE COMM 
THE USER=S EXISTING MONITOR SOFTWARE MUST BE MODIFIED TO ALLO 
THE TWO NEW COMMANDS OF <IN> AND <OUT> TO BE RECOGNIZED. 
THE MONITOR EPROM AT LOCATION 0F800H MUST BE CHANGED AS SHOWN 



INPUT -I- 



OUTPUT -0- 



LOCATION 
F86F 
F870 

F87B 
F87C 



NEW DATA 
00 
F7 

15 
F7 



FE7F 


EXPR 


EQU 


FEAA 


LBVTE 


EQU 


FECB 


PARAM 


EQU 



THIS WILL CAUSE THE MONITOR TO BRANCH TO THE NEW PROM CODE AT 
APPROPRIATE LOCATIONS. 

i i J i i ,' > i t i i i } j i i i i } } ;. i ; j ; ; j ; j ; .; j ; j ; ; j - f ; ; ■ ■ 1 ■ j - f ■ ; ; ; ; . f . . . . . . . ^ . . . . 

SVMBOL TABLE FOR LINK POINTS TO MDS MONITOR 

0FE7FH ; BRING IN DATA FROM CONSOLE 

0FEAAH ; DATA OUTPUT ROUTINE TO CONSOLE 

0FECBH .= BRINGS IN ONE BVTE OF DATA FROM CONSOLE 

SVMBOL TABLE FOR PROGRAM LOCATIONS 

10H ; USER RAM, TO BE USED BV ROUTINES. 
0F700H ; FIRST PROM BELOW MONITOR. •;: ARB I TR ARV > 



PATCH 
ROM 



EQU 
EQU 



> > > > > ' > > > > > i i i i i i > i > i i i i i , i i i i , i , i i ■, i ■, i i ;, , i , i t i , i i , , } , , t , - t ; ; ; ■ ; j 
ORG ROM 



INPUT ROUTINE 

THE USER WILL TVPE IN < I XNUMBERX >. THE SVSTEM WILL THEN 
ANSWER WITH <-ANSWER>. WHERE <NUMBER> IS THE INPUT PORT NUMBE 
IN HEX, AND <-ANbWER> IS THE HEX VALUE OF THE SELECTED INPUT 
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F709 CDCBFE 

F703 4D 
F704 211000 
F707 36D8 
F709 23 
F70fl 71 
F70B 23 
F70C 36C9 



F70E CD1000 
r ll CDRflFE 
r-714 C9 



PORT. FOR EXAMPLE, IF INPUT PORT 88 CONTAINS THE VALUE 70 THE 
ROUTINE WILL RETURN: 

. Ifc>8 -79 



INPORT 



CALL 

MOV 
LXI 
MVI 
I NX 
MOV 
INK 
MVI 



PARAM 



FETCH THE PORT NUMBER 



C, L .; SAVE PORT NUMBER IN C REGISTER 

H, PATCH .; LOAD RAM PATCH LOCATION 

M, 0D8H J LOAD <IN> COMMAND 

H 

M, C :■ LOAD PORT NUMBER 

H 

M, 0C9H .; LOAD <RETURN> COMMAND 



RAM WILL NOW HAVE THE PATCH CODE 
IN 

PORT NUMBER 
RETURN 



CALL 
CALL 
RET 



PATCH 
LBVTE 



EXECUTE THE CODE 
DISPLAY THE DATA 
RETURN TO MONITOR COMMAND LOOP 









OUTPORT 




F715 


CD7 


FFE 




CALL 


F718 


211008 




LXI 


F71B 


36C 


£ 




MVI 


F71D 


*£—• 






I NX 


F71E 


Cl 






POP 


F71F 


Dl 






POP 


F720 


73- 






MOV 


rT 21 


79 






MOV 


clcL 


2~" 






I NX 


F723 


36C 


:9 




MVI 



OUTPUT PORT ROUTINE 

THE U--.ER TYPES IN <0><NUMBER>, <DATA>. WHEN THE CARRIAGE 
RETURN IS ACTIVATED.. THE MONITOR WILL OUTPUT TO PORT NUMBER 
<NUMBER> THE VALUE <DATA>, WHERE BOTH <NUMBER> AND <DATH.> HRE 
IN HEX FORMAT. 
AN EXAMPLE WOULD BE: 

kiSC> 42 
THIS WOULD CAUSE HEX 42 TO BE SENT TO PORT NUMBER SC. 



EXPR J FETCH PORT NUMBER AND DATA 

H, PATCH .■ LOAD ADDRESS FOR RAM PATCH 

M, 0D3H ; LOAD <OUT> COMMAND 

H 

B .; DATA VALUE TO OUTPUT IS IN C REGISTER 

D > PORT NUMBER WILL BE IN E REGISTER 

M, E i LOAD PORT NUMBER 

A, C .; MOVE DATA VALUE INTO REGISTER A 

H 

M, 0C9H .: LOAD <RETURN> INTO RAM 
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F725 CD1000 
F728 C9 



THE RAM PATCH AREA WILL NOW HOLD- 
OUT 
PORT 
RET 



CALL 
RET 



PATCH i EXECUTE THE CODE 

J RETURN TO MONITOR COMMAND LOOP 



W000 



END 



END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref No 



AB37 



□ 4004 D 4040 D 8008 H 8080 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



ML0AD 

To allow MDS-DOS users to load a binary file (created by the 
HEXBIN command) using ISIS, at an address modifed with a bias. 
MDS-DOS users cannot currently create, assemble, load, and 
transfer to PROM a program which uses memory addresses less 
than 12,000. The reason for this problem is that such programs, 
when loaded into MDS using the DEBUG command, attempt to overlay 
the ISIS control program. An error will result, aborting the 
attempted load. By using ML0AD, such programs may be loaded at an 
address above 12,000, and then transferred to PROM. 

Standard MDS-DOS configuration, with either 1 or 2 disk 
drives, 32K + memory, and console. 



ISIS control program. 



ML0AD is initiated by an ISIS-like command, as is EDIT, ASM80, etc. 

While system is under ISIS control, and is expecting an ISIS-like 
command, enter: 



ML0AD (f ilename) $= ^iddress) H 



where : 



(filename) is a binary file, created by HEXBIN. 
(address> is the biased address of the load in 
HEX. 

The binary file, specified in {filename) is loaded into MDS 
RAM, beginning at the address biased by (address^ .If no error 
occurrs, control is returned to the MDS Monitor to allow PROM 
programming. Otherwise, an error message will be output on the 
system console, and control is returned to ISIS. Error codes are 
standard ISIS error codes, with the exception of the ML0AD syntax 
error, which is error code 100. 

-SEE ATTATCHED N0TE- 



Registers Modified: 

SEE ATTATCHED NOTE 



RAM Required: 

SEE ATTATCHED NOTE 



ROM Required: 

NONE 



Maximum Subroutine Nesting Level: 

SEE ATTATCHED NOTE 



Assembler/Compiler Used: 
MDS 8080 Macro Assembler 



Programmer: 

William J. 



Long 



Company: 

Sullivan, Long & Hagerty 



Address: 

P.O. Box 2247 Birmingham, Al. 35201 



98-0348 
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MLOAD is designed to operate as an ISIS System command (e.g. EDIT, DEBUG, etc.). 
MLOAD is therefore called in the same way as an ISIS command, and is provided' 
with parameters in the same way. MLOAD will use about 500 bytes of memory 
(between addresses 3000 and 31FF Hex.) and will alter all registers. The 
user must assure that programs loaded by MLOAD will not overlay this area 
of memory as unpredictable results will occur. After performing the MLOAD 
function, control is returned to the MDS Monitor if the load is successful, else 
control is returned to ISIS. 

MLOAD does not perform a Relocate function, and the binary file which is 

loaded is not usually executable. MLOAD simply loads the binary file at 

an adjusted starting address, usually for the purposes of PROM programming. 



No test program is provided because any ISIS binary file will suffice. However, 
a sample load procedure is shown below. 

ABBREVIATED TEST PROGRAM LISTING 

001 0000 F3 DI; 

002 0001 06FF MVI B.OFFH; 

003 0003 0EFF STLOP: MVI C.0FFH; 

004 0005 0D STLLP: DCR C; 

005 0006 C20500 JNZ STLLP; 

006 0009 05 DCR B; 

- ETC - 

Now suppose that this program was assembled, and the output of the assembly, 
when passed through HEXBIN was contained in a file called :F1:BIN.FIL 
If the user wanted to load this program onto PROM chips, a DEBUG command 
could not be used. MLOAD would be used in this case, and the following command 
would be entered on the MDS console: 

MLOAD :F1:BIN.FIL$=3200H 

This would cause the binary file to be loaded into MDS RAM, beginning at address 
3200H (AAAA + BIAS, which in this case, AAAA = 0000H and BIAS = 3200H) . 
Control would then pass to the MDS Monitor, where the following command : 

D3200.3209 
would produce the following list: 

3200 F3 06 FF 0E FF 0D C2 05 00 05 
The PROM could then be programmed by entering: 

PTX3200,3209,00 
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; REF. NO. AB37 

; PROGRAM TITLE MLOAD 



; ****************************************** 
; ***** MDS/DOS ***** 

; ***** MEMORV LOAD FROM DISK ***** 

;***** WITH BIAS OFFSET ***** 

; ****************************************** 



0000 


OPEN 


EQU 


O; 


0001 


CLOSE 


EQU 


1; 


0002 


READ 


EQU 


2; 


0006 


LORD 


EQU 


6> 


000C 


ERROR 


EQU 


12; 


0009 


EXIT 


EQU 


9; 



0040 



ISIS 



EQU 



64; 



2000 




ORG 


03008H; 


~ ~<38 


219F21 


START: LXI 


SP, SPADD; 


_-n*02 


0E03 


MVI 


C, READ; 


2085 


11B420 


LXI 


D, RDDCBj 


3688 


CD4000 


CALL 


ISIS; 


208B 


3A7B21 


LDR 


STATUS; 


288E 


B? 


ORA 


A; 


388F 


C25R20 


JNZ 


ERRTN; 


2812 


2A3E31 


LHLD 


ACTUAL; 


2015 


EB 


XCHGj 




2616 


21BE30 


LXI 


H, BUFFER; 


2819 


014A21 


LXI 


B, LDFIL; 


281C 


?E 


FILNL: MOV 


A, M; 


301D 


FE24 


CPI 


'*'; 


381F 


C22C20 


■JNZ 


GTBIA; 


3922 


02 


STAX 


B; 


2023 


"'"; 


I NX 


H; 


2024 


02 


I NX 


B; 


2825 


15 


DCR 


D; 


2026 


CA6528 


JZ 


STXER; 


2029 


C21C38 


JMP 


FILNL; 


282C 


3E20 


GTBIA: MVI 


A, ■- '; 


282E 


82 


STAX 


B; 


302F 


9GQ6 


MVI 


B, 006H; 


2021 


2~: 


I NX 


H; 


2022 


7E 


MOV 


A, M; 


2823 


FE2D 


CPI 


— j 


>tr; 


C26520 


JNZ 


STXER; 


2033 


CD7620 


CALL 


CONVB; 


292B 


324321 


STA 


LDBIA+1; 



LOAD STACK. POINTER 
READ CONSOLE 



JUMP IF ERROR 
GET BVTEVTE COUNT 

TRANSFER FILE NAME TO LOAD CALL 

TEST FOR END OF FILE NAME 

STORE IN LOAD CALL FILE NAME BUF 
INCREMENT BUFFER ADDRESSES 

DECREMENT COUNT 

JUMP TO ERROR IF COUNT EXCEDED 

INSERT BLANK AFTER FILENAME 

LOAD COUNT 



CHECK FOR = 

JUMP IF SVNTEX ERROR 

CONVERT 2 HIGH ORDER HEX DIGITS 

STORE IN LOAD CALL BIAS WORD 
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203E CD7630 


CALL 


CONVB; 


2041 324231 


STA 


LDBIA; 


3044 23 


I NX 


H; 


3045 7E 


MOV 


A, M; 


3046 FE48 


CPI 


'H'; 


3048 C26530 


JNZ 


STXER; 


304 B 0E06 


MVI 


C, LOAD; 


204D 114031 


LXI 


D, LDDCB; 


3050 CD4000 


CALL 


ISIS; 


2052 3A7B31 


LDA 


STATUS; 


3056 B7 


ORA 


A; 


2057 CA6D30 


JZ 


FINISH; 


305 A 0E0C ERRTN: MVI 


C ERROR; 


305C 117B31 


LXI 


D, ERDCB; 


205F CD4000 


CALL 


ISIS; 


3062 C36D30 


JMP 


FINISH; 


2065 2E64 ST 


«R: MVI 


A, 100; 


2067 227B21 


STA 


STATUS; 


206A C25A20 


JMP 


ERRTN; 


206D 0E09 FINISH: MVI 


C, EXIT; 


306F 114031 


LXI 


D, LDDCB; 


~~-?2 CD4000 


CALL 


ISIS; 


-^5 76 


HLT; 




3076 CDA430 CONVB : CALL 


GETBI; 


3079 17 


RAL; 




307A 17 


RAL; 




307B 17 


RAL; 




307C 17 


RAL; 




307D E6F0 


AN I 


0FOH; 


307F F5 


PUSH 


PSW; 


3080 CDA420 


CALL 


GETBI; 


2082 E60F 


AN I 


00FH; 


2085 4F 


MOV 


C, A; 


2086 Fl 


POP 


PSW; 


2087 Bl 


ORA 


C; 


2088 C9 


RET; 




2089 F5 CVTHB: PUSH 


PSW; 


208A AF 


XRA 


A; 


208B 57 


MOV 


D, A; 


308C 016A31 


LXI 


B, CONTA; 


308F Fl 


POP 


PSW; 


3090 5F 


MOV 


E, A; 


3091 0A CVTLP: LDAX 


B; 


3092 FE47 


CPI 


'G'i 


3094 CAA020 


JZ 


CVRER; 


2097 BB 


CMP 


E; 


3998 CAA230 


JZ 


CVRED; 


>B 03 


I NX 


B; 


2W9C 13 


I NX 


D; 


309D C39120 


JMP 


CVTLP; 



CONVERT 2 LOW ORDER HEX DIGITS T 
CHECK FOR 'H' AFTER ADDRESS KEVI 

ERROR IF NOT 'H' 

LOAD FILE AND TRANSFER CONTROL 
TO MONITOR, ELSE ERROR 



OUTPUT ERROR MESSAGE 
JUMP TO EXIT 
LOAD ERROR CODE 



GET HEX VALUE CONVERT 



MASK OUT LOW-ORDER 4 BITS 
SAVE 

MASK OUT HIGH-ORDER 4 BITS 



CONVERSION ROUTINE HEX-TO-BINARV 

ZERO BINARV COUNTER 
CONVERSION TABLE 

GET HEX CHARACTER 

GET TABLE VALUE 

TEST FOR END OF TABLE 

END OF TABLE? JUMP TO ERROR 

TEST FOR MATCH , 

JUMP IF MATCH 

INCREMENT TABLE POINTER 

INCREMENT BINARV COUNTER 

GO BACK AND TRV, TRV AGAIN 
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20A0 


16FF 


CVRER : 


MVI 


D, 9FFH; 


20A2 


7A 


CVRED : 


MOV 


A, D; 


20A2 


C9 




RET; 




20A4 


23 


GETBI : 


I NX 


H; 


20A5 


7E 




MOV 


A, M; 


ZQfiS 


CDS930 




CALL 


CVTHB; 


20A9 


FEFF 




CPI 


0FFH; 


20AB 


CAAF20 




JZ 


GETER; 


30AE 


C9 




RET; 




20AF 


Fl 


GETER : 


POP 


PSM; 


20B0 


Fl 




POP 


PSM; 


20B1 


C26520 


RDDCB : 


JMP 


STXER; 


20B4 


0100 


RDAFT: 


DW 


1; 


20B6 


BE20 




DM 


BUFFER; 


26B8 


8060 




DW 


128; 


20BA 


2E21 




DM 


ACTUAL; 


20BC 


7B21 




DM 


STATUS; 


20BE 




BUFFER : 


DS 


128; 


212E 




ACTUAL : 
LDDCB : 


DS 


2; 


3140 


4A21 




DM 


LDFIL; 


2142 


0000 


LDBIA: 


DM 


0; 


2144 


0200 


LDRTS : 


DM 


2; 


2146 




LDENT : 


DS 


2; 


2148 


7B21 




DM 


STATUS; 


314A 




LDFIL: 


DS 


22; 



LOAD ERROR RETURN CODE 
LOAD BINARV VALUE IN ACC. 

INCREMENT TABLE ADDRESS 



TEST FOR ERROR 
JUMP IF ERROR 

STACK ADJUST 
STACK ADJUST 
JUMP TO SYNTAX ERROR ROUTINE 



CONSOLE READ AFT 



READ BUFFER 
BVTE COUNT 



POINTER TO FILENAME 

BIAS 

RETURN SMITCH 

ENTRV POINV SFFTRDD (IGNORED) 

FILE NAME 



216A 20212222 CONTA: 
216E 24252627 
2172 28294142 
2176 42444546 
217A 47 



ASCII CONVERSON TABLE 

DB '0122456789ABCDEFG' 





ERDCB : 






217B 


STATUS : 


DS 


2; 


217D 7B21 




DM 


STATUS 


217F 


FILLER: 


DS 


32; 


219F 9000 


SPADD : 


DM 


0; 



STACK AREA 

HIGH STACK ADDRESS 



0000 



END; 
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LIBRARY SUBMITTAL FORM 



Ref. No. 



AB38 



□ 4004 D 4040 □ 8008 XX 8080 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



HEX TAPE LOADER FOR SDK 

LOADS HEX ASSEMBLER OBJECT TAPE INTO RAM OF SDK 



INTEL MCS-80 SDK, ASR-33 TTY 



Required 
Software 



Input 
Parameters 



SDK MONITOR PROM 



PAPER TAPE HEX TAPE FORMATTED BY INTEL OR TIMESHARE 
ASSEMBLERS. 



INSTRUCTIONS: 



Output 
Results 



1) LOAD TAPE IN READER 

2) TYPE (AFTERMONITOR PROMPT) G 1380 (CR] 

3) TURN ON READER 



HEX INFORMATION IS LOADED INTO MEMORY AND CONTROL 
RETURNS TO MONITOR. 

A CHECKSUM ERROR CAUSES THE SIGNON MESSAGE TO BE 
PRINTED. A GOOD LOAD RESULTS IN A MONITOR PROMPT "." 
FOLLOWED BY SOME'"*" ERROR SYMBOLS UNTIL READER IS 
STOPPED. 



Registers Modified: 

N/A 



RAM Required: 

256 BYTES (KIT SUPPLIED) 



ROM Required: 

SDK MONITOR PROM 



Maximum Subroutine Nesting Level: 
NA 



Assembler/Compiler Used: 

ISIS 8080 MACRO ASSM. , VI. 



Programmer: 



A.C. MARSHALL 



Company: 



PROTEON ASSOCIATES, 
INC. 



Address: 24 CRESCENT STREET 

WALTHAM, MA 02154 



98-034B 

4-234 
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,- REF. NO. AB38 

; PROGRAM TITLE HEX TAPE LOADER FOR SDK 

■■ A. C. MARSHALL, FEB 4, 1976 

i HEX TAPE LOADER FOR SDK 

■> LOAD INTO MEMORY USING I COMMAND 

i POSITION IN LEADER OF '0'S' . TYPE I. 

i THEN TURN ON READER. 

> TO RUN TAPE LOADER TYPE G13S0 CR. 

■> POSITION TAPE WITHIN 1 INCH OF BEGIN 
; RECORD MARK THEN TURN ON READER. 

i A GOOD LOAD WILL RETURN TO MONITOR WITH 
i SOME ■'*••■ FOR EACH BLANK CHAR READ FROM 

> TRAILER. 

i A CHECKSUM ERROR WILL RETURN THROUGH 

i MONITOR SIGNON MESSAGE. 

i TO SEE WHAT HAPPENED USE X COMMAND. 

:■ E REG CONTAINS ERROR ON READ. 



1380 ORG 1380H 
1380 O60A ENTR: MVI B, 10 
±S%2 CD1B02 GET: CALL GETCH 

1385 05 DCR B .; 

±SQS CA2BO0 JZ GETCM 

1389 FE3A CPI " : " 
138B C28213 JNZ GET 
1-iSE 1E00 MVI E, 

1390 CDB313 CALL INPBY 
1393 A? flNA A 
1J94 CA2B00 JZ GETCM 
1^97 42 MOV B, D 
1398 CDB313 CALL INPBY 
139B 62 MOV H, D 
139C CDB313 CALL INPBY 
1j:9F 6A MOV L, D 
13A0 CDB31j: CALL INPBY 
1^:A3 CDB313 DATA: CALL INPBY 
13A6 05 DCR B 
13A? 72 MOV M, D 
13A8 23 I NX H 

' ^:A9 C2A313 .JNZ DATA 

j:flC CDB313 CALL INPBY 

13AF CA8013 .JZ ENTR 

13B2 CF rst 1 



LEADER LENGTH 
GET A CHAR 



1" 



> NO RECORD FOUND, RET TO MON 

; BEGIN REC? 

:■ NO, GET ANOUHER 

:• CLEAR E REG 

.; CLEAR ACCUM 

.; RECORD LENG=0O, RET TO MON 

.: SAVE RECORD SIZE IN B 

:• GET HI ADDR 

.; PUT IN H REG 

J GET LO ADDR 

.: PUT IN L REG 

i RECORD TYPE, IGNORE 

■ GET HEX DATA 

.: FINISHED REC? 

i STORE DATA 

:■ INCREMENT MEMORY ADDR 

.: LAST ONE? 

.: YES, GET CHECKSUM 

.; CHECKSUM IS OK, START OVER 

.: CHECKSUM ERROR RTN TO MON 
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, SUBROUTINE 

13B3 CD1B02 INPBV:CflLL GETCH i GET fl CHAR 
13B6 4F MOV C, fl ■ PUT I N fl 

13B7 CDDflOl CALL CNVBN ; CONVERT TO BINflRV 

13BA 0F RRC 

13BB OF RRC 

13BC OF RRC 

l-'BD OF RRC i MOVE IT TO MSD 

l^iBE 57 MOV D,fl ; SAVE FIRST HALF 

13BF CD1B02 CALL GETCH .; INP CHAR 

13C2 4F MOV C, A .; PUT IN C 

13C3 CDDAOl CALL CNVBN ; CONVERT TO BIN 

13C6 82 ADD D .• FORM BVTE 

13C7 57 MOV D, A i CALC CKbUM 

13C8 83 ADD E :■ SAVE NEW CKSUM 

13C9 5F MOV E, A ; SAVE CKSUM 

OCA C9 RET 

; EQUATES 

01DA CNVBN EQU 1DAH i MONITOR ROUTINE 

-.IB GETCH EQU 21BH ; MONITOR ROUTINE 

kJOOF LSD EQU OFH 

002B GETCM EQU 02BH i MONITOR ROUTINE 
0000 END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB39 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D 4040 O 8008 3 8080 



(use additional sheets if necessary) 



HEX FORMAT PAPER TAPE DUMP 

DUMP SECTIONS OF STORED PROGRAM IN HEX FORMAT (AS IS 
PRODUCED BY INTEL ASSEMBLER) . NO LEADER IS PRODUCED SO 
THAT MULTIPLE SECTIONS MAY BE CONCATENATED INTO ONE TAPE 

NOTE: EACH "." MONITOR PROMPT MUST BE "RUB OUT" 
OVERPUNCHED TO LOAD WITH ATTACHED LOADER. 

INTEL MCS-80 SDK, ASR-33 TTY. 



SDK MONITOR PROM 

MEMORY START, FINISH ADDRESSES: 
INSTRUCTIONS: IN MONITOR 

1) TYPE .6 1300 (CR) 



HEX FORMAT PAPER TAPE. 
MANUALLY, OFF LINE. 



XXXX,YYYY (TURN ON PUNCH) (CR) 



LEADERS SHOULD BE PRODUCED 



Registers Modified: 

NA 



RAM Required: 
SDK SUPPLIED (2 56 BYTE) 



ROM Required: 

SDK MONITOR PROM 



Maximum Subroutine Nesting Level: 

-MA 



Assembler/Compiler Used: ISIS 8080 
MACRO ASSEMBLER, VI. 



Programmer: 



A.C. MARSHALL 



Company: 



PROTEON ASSOCIATES, 
INC. 



Address: 



24 CRESCENT ST. 
WALTHAM, MA 02154 



98-034B 
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REF. NO. AB39 

PROGRAM TITLE HEX FORMAT PAPER TAPE DUMP 



A. C. MARSHALL, FEB 4, 1976 

HEX FORMAT FORMAT DUMP ROUTINE 
USES MONITOR IN SDK 
COMMAND IS G1200 
THEN GIVE TWO ADDRESSES IN STD MON 
FORMAT. 
TURN ON PUNCH THEN HIT CR 



1300 






ORG 


1300H 




1300 


0E02 


DUMP: 


MVI 


C, 2 


i INIT TO 2 ADDR 


1302 


CD5702 




CALL 


GETNM 




1305 


Dl 




POP 


D 


■> END ADDR 


1306 


El 




POP 


H 


: START ADDR 


307 


CDEE01 


DCM05 : 


CALL 


CROUT 


;RETN 


130A 


0E3A 




MVI 


C, ' : ' 


■p RECORD FORM 


130C 


CDFA03 




CALL 


CO 


• OUTPUT IT 


130F 


7B 




MOV 


A, E 


. LSD OF ADDR END 


1310 


95 




SUB 


L 


LSD OF PRLSENT START ADDR 


1311 


FE0F 




CPI 


NEWLN 




1313 


D24C13 




JNC 


MAX 


>=?, VES 


1316 


3C 




INR 


A 


EQU MEANS ONE LOCATION 


1317 


47 




MOV 


B, A 


SAVE A 


1318 


AF 


FULL: 


XRA 


A 


CALEAR CKSUM 


1319 


326713 




STA 


TEMP 


CLEAR CKSUM 


131C 


78 




MOV 


A, B 


RECALL A 


131D 


CD5A13 




CALL 


CKSUM 


OUTPUT REC LENGTH 


1320 


7C 




MOV 


A, H 


GET HI ADDR 


1321 


CD5A13 




CALL 


CKSUM 


OUTPUT HI ADDR 


1324 


7D 




MOV 


A, L 


GET LO ADDR 


1325 


CD5A13 




CALL 


CKSUM 


OUTPUT LO ADDR 


1328 


AF 




XRA 


A 


CLEAR A 


1329 


CD5A13 




CALL 


CKSUM 


OUTPUT REC TVPE 


132C 


7E 


DCMIO : 


MOV 


A, M .: 


GET BVTE 


132D 


CD5A13 




CALL 


CKSUM i 


OUTPUT BVTE 


1330 


CD9C02 




CALL 


HILO ; 


DONE? 


1333 


DA4313 




JC 


CKOUT i 


VES , FINISH OFF 


1336 


23 




I NX 


H i 


NO, NEW ADDR 


1337 


7D 




MOV 


A, L .; 


ADDR TEST 


338 


E60F 




AN I 


NEWLN .; 


NEW LINE? 


J.33A 


C22C13 




JNZ 


DCM10 ; 


NO, NEXT BVTE 


133D 


CD5113 


RCEND : 


CALL 


CKEND ; 


VES, SEND CKSUM 


1340 


C30713 




JMP 


DCM05 .; 


DO NEW RECORD 
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1342 
1346 
1349 
134C 
134E 
1251 
1354 
1355 
1356 
1359 
135A 
135B 
135E 
135F 
1362 
1363 
1366 
1367 
025? 
01EE 
03FH 
2C3 
029C 

000F 

902B 

0000 



CD5113 
CDEE01 
C32B00 

0610 

C31813 

2A671J- 

2F 

3C 

CDC302 

C9 

47 

3A6713 

80 

326713 

78 

CDC302 

C9 

00 



CKOUT : 

MAX: 
CKEND : 

CKSUM : 



TEMP: 

GETNM 

CROUT 

CO 

NMOUT 

HILO 

NEWLN 

GETCM 



CALL 

CALL 

JMP 

MVI 

JMP 

LDfl 

CMA 

INR 

CALL 

RET 

MOV 

LDA 

ADD 

STA 

MOV 

CALL 

RET 

DB 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

END 



CKEND 

CROUT 

GETCM 

B, 10H 

FULL 

TEMF 

A 
NMOUT 

B, A 

TEMP 

B 

TEMP 

A, B 

NMOUT 



0257H 

1EEH 

3FAH 

2C3H 

29CH 

0FH 

2BH 



; SEND CKSUM 

':■ DONE REENTER MONITOR 
> MAX RECORD SIZE 

■ GET CKSUM 

; NEGATE 
i OUTPUT 



SAVE B 

GET OLD CKSUM 
ADD NEW TO OLD 
SAVE NEW CKSUM 
RESTORE A 
OUTPUT DIGIT 
RETURN 

CKSUM STORAGE 
MON ROUTINE 
ROUTINE 
ROUTINE 
ROUTINE 
ROUTINE 



MON 

MON 

MON 

MON 

MASK 

MON ENTRV 



POINT 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. AB40 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 ZX8080 



(use additional sheets if necessary I 



PAPER TAPE REF0RMATTER 



REFORMATS THE "DUMP" (D INSTRUCTION) TAPE OF THE 
80-SDK MONITOR INTO A COMPATIBLE FORMAT FOR RELOADTNr 
WITH THE "INSERT" (I) INSTRUCTION. LOADING 



MCS- 80-SDK ASR-33 OR EQUIVALENT PAPER TAPE TERMINAL 
NO MODIFICATIONS OF KIT NECESSARY. i^MINAL, 



MCS 80-SDK PROM MONITOR REVISION AS LISTED IN INTEL SDK 
USERS GUIDE PRELIMINARY EDITION (98-203A) 



b£5£. TAPE F0RMED by USING D INSTRUCTION WITH LEADER 
PROGRAM LOOKS FOR 2 CR, LF CHARACTERS TO BEGIN EXECUTION. 



INSTRUCTIONS: 



1) 
2) 

3) 
4) 



TURN ON PUNCH 

LOAD TAPE IN READER 

TYPE IN (AFTER MONITOR PROMPT) .G 1300 (CR] 

TURN ON READER 



PAPER TAPE IS OUTPUT WITH A LEADER OF ASCII "0" THIS 
ALLOWS READ AS FOLLOWS: * S 

INSTRUCTIONS: 1) LOAD OBJECT TAPE SET TO NEAR END OF »£>" LEADER 

2) TYPE IN .1 

3) TURN ON READER 

4) REMAINDER OF INSERT INSTRUCTION IS ON TAPE 



Registers Modified. 

-MA 



RAM Required: 

KIT SUPPLIED 2 56 Bytes 



ROM Required: 

SDK MONITOR 



Maximum Subroutine Nesting Level: 

NA 



Assembler/Compiler Used: ISIS 

8 080 MACRO ASSEMBLER VI. 



Programmer: A ^ MARSHALL 



Company: 



PROTEON ASSOCIATES, 

INC. 



Address: 



21+ CRESCENT STREET 
WALTHAM, MA 02154 



98034B 
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REF. NO. AB40 

PROGRAM TITLE PAPER TAPE REFORMATTER 



A. C. MARSHALL, FEB 4, 1976 

TAPE REFORMATTING ROUTINE 
TAPE IN THE FORM OF A D COMMAND 
FROM THE SDK IS REFORMATTED IN 
THE FORM FOR AN INSERT 'I' COMMAND 
FOR THE MONITOR 

START THE OBJECT TAPE IN THE READER 

AT THE FIRST CHARACTER. WHEN THE ' 

FROM THE MONITOR IS RECEIVED, TURN ON THE 

TAPE READER. 



01E3 


CO 


EQU 


01E3H 


; MONITOR ROUTINE 


000A 


LF 


EQU 


0AH 


* MONITOR ROUTINE 


32B 


GETCM 


EQU 


02BH 


; MONITOR ROUTINE 


01EE 


CROUT 


EQU 


1EEH 


-MONITOR ROUTINE 


021B 


CI 


EQU 


021BH 


: MONITOR ROUTINE 


021B 


GETCH 


EQU 


021BH 


: MONITOR ROUTINE 


001B 


ESC 


EQU 


1BH 




000D 


CR 


EQU 


0DH 




0014 


LDRLN 


EQU 


20 




1300 


J 


ORG 


13O0H 




1300 1614 


ENTRY : 


MVI 


D, LDRLN , 


SIZE OF LEADER 


1302 0E30 




MVI 


C, "0" 


ZERO FOR LEADER 


1304 CDE301 


LEADER : 


CALL 


CO 


OUTPUT LEADER 


1307 15 




DCR 


D ; 


DONE? 


1308 C20413 




JNZ 


LEADER } 


NO, LOOP 


130B CD1B02 


START : 


CALL 


GETCH i 


INPUT CHARACTER 


130E FEOA 




CPI 


LF i 


LINE FEED? 


1310 C20B13 




JNZ 


START ; 


NO, GET ANOTHER 


1313 CD1B02 




CALL 


GETCH ; 


RECORD 


1316 CD1B02 




CALL 


GETCH .; 


/LENGTH, IGNORE 


1319 1E06 




MVI 


E, 6 i 


6 CHAR 


131B 1604 




MVI 


D, 4 ; 


VES, GET ADDR. 


131D CD7113 


ADRI: 


CALL 


CARECH i 


OUTPUT CHAR 


1320 15 




DCR 


D i 


ALL 4? 


1321 C21D13 




JNZ 


ADRI ; 


NO, REPEAT 


1324 CD1B02 




CALL 


GETCH i 


BLANK- OMIT 


327 0E0D 




MVI 


C, CR ; 


SET UP CR 


-329 CDE301 




CALL 


CO ; 


OUTPUT IT 


132C CD7113 


DATA : 


CALL 


CARECH i 


DIGIT 1 


132F CD7113 




CALL 


CARECH ; 


DIGIT 2 
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1332 2E0D 




MVI 


A, CR 


; BLANK- OMIT 


1334 3E0D 




MVI 


A, CR 


; 3RD CHAR IN A 


1336 B9 




CMP 


C 


.: CR? 


1337 C22C13 




JNZ 


DATA 


.; NO, REPEAT 


133A 0E2C 




MVI 


C, ", '' 


; VES, LINE DONE 


133C CDE301 




CALL 


CO 


.: OUTPUT •-. 


133F CD1B02 




CALL 


GETCH 


.; LINE FEED - NO OUT 


1342 CD1B02 




CALL 


GETCH 


.; HX DOT OR . 


1345 3E2E 




MVI 


A, '. '' 


i CHECK END 


1347 B3 




CMP 


C 


.; END? 


1348 C26113 




JNZ 


NXTLN 


; NO, DO AGN 


134B 0E1B 




MVI 


C, ESC 


.; VES 


134D CDE301 




CALL 


CO 


; OUTPUT ESC 


1350 0E00 


ENDTP : 


MVI 


C, 


; BLANK FOR TRAILER 


1352 1614 




MVI 


D, LDRLN 


; SIZE OF LEADER 


1354 CDE301 


TRAIL: 


CALL 


CO 


■> OUTPUT BLANK 


1357 15 




OCR 


D 


j DONE? 


1358 C25413 




JNZ 


TRAIL 


; NO, CONTINUE 


135B CDEE01 




CALL 


CROUT 


i VES, RETURN 


135E C32B80 




JMP 


GETCM 


i /TO MONITOR 


1361 1604 


NXTLN : 


MVI 


D, 4 


; SET COUNTER TO 4 


363 ID 




DCR 


E 


; DONE 5 REC? 


1364 CA5013 




JZ 


ENDTP 


; VES END 


1367 CD1B02 


NADR: 


CALL 


GETCH 


j NO, GET A CHAR 


136A 15 




DCR 


D 


> DONE? 


136B C26713 




JNZ 


NADR 


; NO, LOOP 


136E C32C13 




JMP 


DATA 


; DO NEXT RECORD 




; SUBROUTINES: 






1371 CD1B82 


CARECH 


: CALL 


GETCH 


i GET CHAR 


1374 CDE301 




CALL 


CO 


;ECHO IT 


1377 C9 




RET 




; RETURN 


0000 




END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM a*, no 



AB41 



D 4004 □ 4040 □ 8008 8080 Q 3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



DATA 10 PROM TAPE PROCESSOR VI . DATA 10 

CREATE, EDIT AND PUNCH PAPER TAPE IN THE BINARY FORMAT REQUIReI) 
FOR DATA 10 PROM PROGRAMMERS 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



CONSOLE, INTELLEC MDS-800, PAPER TAPE READER, PAPER TAPE PUNCH 



MDS-800 MONITOR 



HEX INPUT FROM CONSOLE, HEX OR BINARY TAPE INPUT 



Output 
Results 



PAPER TAPE IN BINARY IMAGE FORMAT, AND LISTINGS 



Program offered 
on diskette only. 



Registers Modified: 

ALL 



RAM Required: 

FCBH - H043D 



ROM Required: 

NONE 



Maximum Subroutine Nesting Level: 

LESS THAN 6 



Assembler/Compiler Used: 

ASM80 MACRO ASSEMBLER 



Programmer: 

J. WILLOTT 



Company: 



Address: 1487 BONGATE COURT 

SAN JOSE, CA. 95130 



8/78 



98-034C 

4-246 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AC13 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 KK8080 



(use additional sheets if necessary) 



CENTRONICS 



Assembler oriented 

306 Line Printer Handler and Error Only Assembly 



Allows assemblies to be performed on Centronics 306 
Line Printer without top of form option. 

Two listings are available 1) errors only 

2 ) normal 



See attached for interface detail, 

Line printer on output port 7 

input port "+ 



Normal 808 Monitor and Assembler 



G 37E0 Error Only Listing 
B 37F0 Final Listing 

These can be set or changed at any time by re-entering the 
monitor with a console reset. 



The routine can be modified to provide both listings on 
a teletype by altering the following instructions and 
reassembling. 



Line 15 ANI 80H 

29 Status EQU 4 

30 LPRT EQU 7 

Delete lines 20 thru 25 



to ANI 04H 

to Status EQU 1 

to LPRT EQU 

ADI 8 OH to out LPRT 



Replace LINED: RET with 



LINEND: 



MVI A,0AH 
OUT LPRT 
RET 



Registers Modified: 



RAM Required: 

1 page 



ROM Required: 

1 page 



'•may be located in 
RAM if desired 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

8080 



Programmer: 

R. Perry and D. Rush 



Company: 

Westinghouse Transportation 



Address: 2001 Lebanon Road 

West Mifflin, PA 15122 

98-034B 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AA9 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 □ 8080 



(use additional sheets if necessary) 



Memory Test 8080 

To perform a functional test of the ram memory within a reasonable 
time. Using modified walking ones and zeroes test pattern. 



MDS-800 with List output device. . . May use console. 



MDS-800 monitor list output subroutine for printing error me s sag 



es. 



4 equate card describing the dimentionality of the memory chips, 
the start/end address of memory to be tested, the origin of the 
program and the address of the character output subroutine. 



Returns to monitor if no errors. . . else prints each memory location 
in error, the data received from memory, and the test data written. 
Test time for 4K bytes of memory is one minute. 



Registers Modified: 

All 


Assembler/Compiler Used: IS IS 808 

Macro Assembler, VI. 


RAM Required: 

286 Bytes 


Programmer: 

S. G. Thompson 


ROM Required: 

Intel MDS-800 Monitor I/O 
Subroutines 


Company: 

Harris Controls 


Maximum Subroutine Nesting Level: 
[ 5+4 pushes 


Address: 

P.O. Box 430 

Melbourne, Florida 32901 



98-034B 
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PfiQE 1 



1000 
4000 

0040 
0000 
0041 



REF. NO. AA9 

PROGRAM TITLE MEMORV TEST 8080 



MEMORV TEST 

MEMS EQU 1000H ; MEMORV START ADR FOR TESTING 

MEME EQU 4000H ; MEMORV END ADR 

i MEMORV CHIP DIMENTIONALTV 64 BV 64 

MDEM EQU 64 ; 4K MEM CHIP SUCH AS 210? INTEL 

DAT AS EQU O00H j STARTING MEMORV DATA PATTERN <BACKGROU 

MP INC EQU MDEM+1 ; POINTER INC. VALUE FOR NEXT ALT P 







f 




MDS-800 


SUBROUTINES USED 






J 






L0 <LIST OUTPUT I/0> 






J 






bTART <OF MONITOR) 


30F 




LO 


EQU 


0F80FH 




K826 




START 


EQU 


0F826H 


; MONITOR ADR. . STACK RESET 


0100 






ORG 


100H 


;PGM START ADR 


0100 


311E02 




LXI 


SP, STACK 


.: SET STACK ADR. 


0103 


0E00 




MVI 


C, 


i FIRST TIME FLAG 


0105 


0600 




MVI 


B, DATAS 


i B=DATA 


0107 




NPAT 


EQU 


$ 


; DO NEXT PATTERN 


0107 


AF 




XRA 


A 


; CLEAR OFSET 


0108 


22EB01 




STA 


OFSET 




010B 


210010 


BEGIN: 


LXI 


H, MEMS 


i HL= MEM START ADR 


010E 


CD5001 




CALL 


BASE 


.: GO TO CALC BASE ADR FOR REl 


0111 


CD5C01 


WRITE: 


CALL 


WCHK 


> WRITE PROPER PATTERN AT THIS AD» 


0114 


23 




I NX 


H 


;NEXT MEM ADR 


0115 


7C 




MOV 


A, H 


J CHECK FOR DONE WITH WRITE 


0116 


FE40 




CPI 


MEME/256 


i HIDH ADR. CHECK 


0118 


C21101 




JNZ 


WRITE 


J LOOP TIL DONE 


011B 


?D 




MOV 


A.. L 




011C 


FEOO 




CPI 


MEME- < MEME/256 >*256 ; LOW 


011E 


C21101 




JNZ 


WRITE 




0121 


210010 




LXI 


H, MEMS 


i BACK TO START FOR READ 


0124 


CD5001 




CALL 


BASE 


■> GO CALC BASE ADR FOR READ 


0127 


CD6F01 


READ: 


CALL 


RCHK 


J READ & CHECK FOR OK 


012A 


23 




I NX 


H 




012B 


7C 




MOV 


A,H 


; CHECK FOR DONE WITH READ 


■•12C 


FE40 




CPI 


MEME/256 


i HIDH ADR. CHECK 


J.2E 


C22701 




JNZ 


READ 




0121 


7D 




MOV 


A, L 




0122 


FE00 




CPI 


MEME- < MEME/256 >*256 ; LOW 
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0134 C22701 



0137 


3AEB01 


013A 


3C 


013B 


32EB01 


013E 


FE41 


0140 


C20B01 


0143 




0143 


79 


0144 


B7 


0145 


C226F8 


0148 


78 


0149 


2F 


014A 


47 


014B 


8EFF 


014D 


C30701 


0150 




0150 


110010 


0153 


3AEB01 


L56 


83 


W157 


5F 


0158 


AF 


0159 


8A 


015A 


57 


015B 


C9 



015C 




015C 


7C 


015D 


BA 


015E 


C26D01 


0161 


7D 


0162 


BB 


0163 


C26D01 


0166 


78 


0167 


2F 


8168 


77 


0169 


CD9301 


016C 


C9 


016D 


70 


016E 


C9 



NXT 



BASE 



x6F 
016F 7C 
0170 BA 



WCHK 



W2: 



RCHK 



JNZ READ 
CHECK FOR DONE 
LDA OFSET 

A 

OFSET 

MDEM+1 

BEGIN 

* 

A, C 

A 

START 

A, B 



OFSET=MDEM 



INR 
STA 
CPI 
JNZ 
EQU 
MOV 
ORA 
JNZ 
MOV 
CMA 
MOV 
MVI 
JMP 



B, A 

C, OFFH 
NPAT 



CONTINUE TILL DONE 



BACK TO MONITOR 



DATA NOW COMPLEMENTED 
SET SECOND TIME FLAG 
GO TO NXT PATTERN 



SUBROUTINE TO CALC BASE ADR. FOR ALT BATTERN START 



EQU 
LXI 
LDA 
ADD 
MOV 
XRA 
ADC 
MOV 
RET 



# 

D, MEMS 
OFSET 
E 

E, A 
A 

D 
D, A 



i MEM START 
; PLUS OFSET 



ADD IN ANV CARRY 
RESTORE 



SUBROUTINE TO WRITE DATA PATTERN INTO MEMORY 



EQU 

MOV 

CMP 

JNZ 

MOV 

CMP 

JNZ 

MOV 

CMA 

MOV 

CALL 

RET 

MOV 

RET 



A, H 

D 

W2 

A, L 

E 

W2 

A, B 

M, A 
INCD 

M, B 



j CHECK FOR ALTERNATE DATA PATTERN ADR 
;NOT ADR. .. WRITE BACKGROUND 

; NOT ADR. .. WRITE BAKGND ELSE. . . 
■> COMPLEMENT PATTERN AND. . . 

J WRITE 

.; INC ALT DATA PATTERN POINTER 

; STORE BACKGROUND DATA PATTERN 



SUBROUTINE TO READ AND CHECK MEMORY DATA 

EQU -* 

MOV A, H i CHECK ADR 

CMP T> 
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0171 


C28A01 


0174 


70 


0175 


BB 


0176 


C28A01 


0179 


C5 


017A 


78 


017B 


2F 


017C 


47 


017D 


7E 


017E 


88 


017F 


CA8501 


0182 


CD9B01 


0185 


CI 


0186 


CD9301 


0189 


C9 


018A 


7E 


018B 


B8 


018C 


CA9201 


018F 


CD9B01 


0192 


C9 


0193 




0193 


E5 


0194 


214100 


0197 


19 


0198 


EB 


0199 


El 


019A 


C9 



R2: 



JNZ 
MOV 
CMP 
JNZ 



R2 
A, L 

E 
R2 



PUSH B 

MOV A, B 
CMA 

MOV B, A 

MOV A, M 

CMP B 

JZ *+6 

CALL ERROR 

POP B 

CALL INCD 
RET 

MOV A, M 

CMP B 

JZ *+6 

CRLL ERROR 
RET 



iB = CALC. DATA WRITTEN 

;A = DATA FROM MEMORV 

; GET DATA 
i CHECK ' CELL FOR ERROR 

i GO TO PRINT OUT 

; RESTORE REGS 

} INC. ALT DATA PATTERN POINTER 

; R = MEM DATA 

i B= DATA WRITTEN 

; IF ERROR PRINT ELSE BACK TO CRLLER 



SUBROUTINE TO INC. RLT DRTA PATTERN POINTER 
INCD EQU * 

PUSH H , SAVE HL 

LXI H, MP INC j GET INC. VALUE 

PSR. D > HL <= ALT. PRTTERN POINTER + INC 

*LHU ; BACK IN DE 

P0P H ; RESTORE HL 
RET 

t MEMORV ERROR PRINTING SUBROUTINE 

i LINE FORMAT: 
.: AAAA XXM VVT 

' XX= MEMORV DATA IN ERROR 

: W= TEST DATA PATTERN • 

■ : RRRR= RDDRESS OF MEM FAILURE 

A, X, V ALL IN HEX 



019B 


ERROR EQU 


* 




019B 


C5 


PUSH 


B 


.: BC SAVED 


S19C 


F5 


PUSH 


PSW 


> ACC SAVED 


019D 
019F 


0E0D 
CD0FF8 


MVI 
CRLL 


C, ODH 
LO 


.: CARRIAGE RET 


01R2 
01R4 


0E0A 
CD6FF8 


MVI 
CALL 


C, 0AH 
LO 


J LINE FEED 


01R7 


CDC701 


CALL 


DADR 


;MEM ADR PRIN 


■^IRR 


0E20 


MVI 


C '■ " 


> BLANK 


xRC 


CDQFF8 


CALL 


LO 




01 RF 


Fl 


POP 


PSW 




01B0 


CDCF01 


CALL 


DBVTE 


.•• PRINT MEM Dfi' 
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PALiE 4 



01B2 0E4D 
01B5 CD0FF8 
01B8 0E20 
01BFI CD0FF8 
01BD CI 
01BE 78 
01BF CDCF01 
01C2 0E54 
01C4 C30FF8 



01C? DADR 

01C? ?C 
01C8 CDCF01 
01CB 7D 
01CC C3CF01 



01CF F5 DBVTE 

tDO 0F 
tUDl 0F 
01D2 0F 
01D3 0F 
01D4 CDE101 
01D7 CD0FF8 
01DR Fl 
01DB CDE101 
SIDE C30FF8 



01E1 CONV 

01E1 E60F 

01E2 C690 

91E5 27 

01E6 CE40 

01£8 27 

01E9 4F 

«1ER C9 

01EB OFSET 

01EB 

81EC 

021E STRCK 

•••900 



MVI C, M' 

CALL L0 

MVI C, ' ' 

CALL L0 

POP B 

MOV A, B 

CALL DBVTE 

MVI C, 'T' 

JMP L0 



FLAG Ab- ' M 
BLANK 



PRIN'I DATA WRITTEN 
; T = TEST PATTERN 



DUMP MEMORV ADR REG TO LO 

EQU * 

MOV A, H 

CPILL DBVTE 

MOV A, L 

JMP DBVTE 

DISPLFIV ON L0 DATA BVTE IN ACC 

REG-C DESTROVED 
PUSH PSW 
RRC 
RRC 
RRC 
RRC 

CALL CONV 
CALL LO 
POP PSW 
CALL CONV 
JMP LO 



i SHIFT OVER 



; CONVERT TO HEX ASCII 

i PRINT 

.; RESTORE LSD 

i CONV TO ASCII HEX 



EQU 
AN I 
AD I 
Dftft 
ACI 
DAR 

mov 

RET 
EQU 
DS 

DS 

EQU 

END 



CONVERT 4 BIT BINARV INTO ASCII HEX 

4 BITS IN LSD OF ACC, ASCII IN REG C 

0FH 
90H 



40H 
CJFl 



ALT PATTERN BASE RDR. O OFSET+ME 



STACK MEMORV 
50 
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MICROCOMPUTER USER'S 

LIBRARY SUBMITTAL FORM r*. no mz 



D 4004 □ 4040 □ 8008 B 8080 D 3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



SYM 



SYMBOL TABLE DUMP FOR INTELLEC 8/80 



INTELLEC MCS, PRINTER (CONSOLE OR LIST DEVICE) 



INTEL ASSEMBLER VERSION 4.0 



SYMBOL TABLE AS LEFT AFTER AN ASSEMBLY 



THE ASSEMBLED SYMBOLS FOLLOWED BY THE ASSIGNED ADDRESS 
(VALUE). THE OUTPUT IS SIMILAR TO THE MDS ASSEMBLER 
SYMBOL TABLE DUMP. 



Registers Modified: 
ALL 



RAM Required: 
NONE 



ROM Required: 



63 10 BYTES 



Maximum Subroutine Nesting Level: 

2 



Assembler/Compiler Used: 

INTEL MACRO ASSM /4.0 



Programmer: 

LORNE DOUGLAS 



Company: 

TELAID SYSTEMS 



Address: 



6725 Variel 

Canoga Park, CA. 91303 



98-Q34C 

4-256 



l--£ 8030 MACRO ASSEMBLER, VI. 1 



PAGE 1 



REF NO. AB42 

PROGRAM TITLE SVMBOL TABLE DUMP FOR MOD 80 



*** SVMBOL TABLE DUMP FOR INTELLECT 



THIS ROUTINE PRINTS THE SVMBOL TABLE 
AFTER AN ASSEMBLV IS COMPLETE. THIS 
PARTICULAR VERSION RUN UNDER MONITOR 
VERSION 3. O AND ASSEMBLER VERSION 4. 0. 
THIS PROGRAM HAS BEEN ASSEMBLED TO 
RUN IN RAM AND I HAVE MODIFIED THE 
BRANCH TABLE TO PRINT SVMBOLS BV 
TVPING V UNDER THE MONITOR. 



TO ADAPT TO ANOTHER ASSEMBLER OR 
MONITOR ONE WOULD HAVE TO FIND THE 
START OF THE SVMBOL TABLE IN RAM AND 
SUBSTITUTE THE UTILITV ROUTINE ADDR. 



3368 




SVM: 


ORG 


3368H 


: FOR PROM 


3368 


218E1D 


NXTLN : 


LXI 


H, 1D8EH. 


STARTING ADDR OF 
• SVMBOL TABLE 


336B 


CDCD3C 




CALL 


CRLF 


NEW LINE TO LIST 


336E 


16FD 


NXTSVM 


MVI 


D, -3 


3 SVMBOLS PER LINE 


3370 


CD9333 




CALL 


PRINT , 


PRINT SVMBOL CHR 


3373 


CD533C 




CALL 


BLK 




3376 


23 




I NX 


H 


INCREMENT TO HEX 


3377 


23 




I NX 


H 


VALUE AND PRINT 


3378 


7E 




MOV 


A, M 




~~i?9 


CDC73D 




CALL 


LBVTE , 




J?C 


2B 




DCX 


H 




337D 


7E 




MOV 


A, M 




337E 


CDC73D 




CALL 


LBVTE , 
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32-81 


2.S 




I NX 


H 


; NOW I NCR TO NEXT 


3382 


23 




I NX 


H 


i SVMBOL 


3383 


CD533C 




CALL 


BLK 


'} 


3386 


CD533C 




CALL 


BLK 


f 


3389 


CD533C 




CALL 


BLK 


.' 


338C 


14 




INR 


D 


f 


338D 


FH7033 




JM 


NXTSVM 


* 


3390 


C36B32 


* 

PRINT: 


JMP 


NXTLN 




3393 


1EFB 


PR2: 


MVI 


E, --5 


;5 CHR PER SVMBOL 


3295 


7E 




110V 


A, M 


.; TEST FOR END OF 


3396 


FE8D 




CPI 


6DH 


.: TABLE 


3398 


C29E33 




JNZ 


PR3 


* 


329B 


C36B38 


PR3: 


JMP 


START 


i DONE - AD I OS 


339E 


4E 




MOV 


CM 


; PRINT SVMBOL 


329F 


CD553C 




CALL 


CO 


J 


33A2 


23 




I NX 


H 


i NEXT CHR 


33A3 


1C 




INR 


E 


:. CHR COUNT 


3A4 


C8 




RZ 






j:3A5 


C39533 




JMP 


PR2 


.• 



** MONITOR UTILITIES 



3C52 
2C55 
3CCD 
2DC7 
386B 



BLK 


EQU 


3C53H 


CO 


EQU 


2C55H 


CRLF 


EQU 


2CCDH 


LBVTE 


EQU 


2DC7H 


START 


EQU 


286BH 



.; PRINT 1 BLANK 
.; PRINT 1 ASCII CHR 
;END OF LINE SEQNCE 
; PRINT HEX BVTE 
j MONITOR RESTART 



0000 



END 



iny 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. AB43 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



n 4004 D 4040 n 8008 18 8080 



(use additional sheets if necessary) 



MON256 

Provides the most commonly used monitor debug functions in 
a single 256-byte EPROM: Go To, Substitute, Display, Hex 
Arithmetic, Find Byte, and Move. 



As assembled requires INTELLEC 8/MOD 80 with TTY on ports 
and 1. Can easily be reassembled with different input/out- 
put assignments for use with any user designed hardware 
which has ASCII I/O capability. 

None 



ASCII Characters - 9, A - F, G, H, M and S. 
Addresses must be entered as four characters. 
Bytes must be entered as two characters. 
Leading zeros are significant. 



ASCII characters corresponding to hexadecimal memory 
addresses and contents. 



Registers Modified: 
ALL 



RAM Required: 

11 BYTES FOR STACK 



ROM Required: 

256 BYTES 



Maximum Subroutine Nesting Level: 
5 



Assembler/Compiler Used: 

8080 MACRO ASSEMBLER, VER 3.0 



Programmer: 

FRANK FAFF 



Company: 

ATLANTIC RESEARCH CORP. 



Address: 
5390 CHEROKEE AVENUE 
ALEXANDRIA. VA. 22314 



98-034B 

4-260 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. AB44 



D 4004 □ 4040 □ 8008 [J 8080 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



CHARACTER INTERPRETED MEMORY DUMP 

Prints contents of selected portion of memory. 
Each line contains beginning address followed by 16 
bytes xn hex format and same 16 bytes repeated in 
character format. Minimum dump contains 256 bytes. 
All dumps are spaced to place three 256 byte blocks 
on an 11 inch page with column identification at the 
top of each page. 

Intellec 8/Mod 80 with TTY or equivalent. 



Intellec Monitor Version 2.0 



Program prompts for two addresses with an '@» 
Addresses are entered in hex separated by a comma 
or blank as in the Monitor dump command. 



Prints memory in 2 56 byte blocks as described 
above . 



Registers Modified: Monitor ±s 

reinitialized at exit. 



RAM Required: 

Program requires 242 
bytes. Will execu te in eithe| 

ROM Required: RAM Or RUM. 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: ISIS 8080 
Macro Assembler, VI. 



Programmer: 

Jim Squires 



Company: 

Allan Hancock College 



Add res; 



Santa Maria, Ca 9 3454 



98-034B 

4-262 
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REF. NO. AB44 

PROGRAM TITLE CHARACTER INTERPRET MEMORV DUMP 



MEMORV DUMP WITH CHARACTER INTERPRET 
DEFINE EXTERNAL REFERENCES 



3D6B 


EXPR 


EQU 


3D6BH 


3CC8 


CRLF 


EQU 


3CC8H 


3DBA 


LADR 


EQU 


3DBAH 


3C4E 


BLK 


EQU 


3C4EH 


3DC2 


LBVTE 


EQU 


3DC2H 


3D9F 


HILO 


EQU 


3D9FH 


386B 


START 


EQU 


386BH 


3C50 


CO 


EQU 


3C50H 


3C3E 


LER 


EQU 


3C3EH 



INITIALIZATION 



300 


DUMP : ORG 


7000H 


J ENTRY POINT 


r'000 


0E40 


MVI 


c, ••©■• 


; GET PROMPT CHAR 


7002 


CD503C 


CALL 


CO 


; PRINT IT 


7005 


CD4E3C 


CALL 


BLK 


i AND A BLANK 


7008 


0E02 


MVI 


C, 2 


> SET UP FOR TWO ADDRS 


700A 


CD6B3D 


CALL 


EXPR 


i GET TWO ADDRESSESS 


700D 


Dl 


POP 


D 


J ENDING ADDR 


700E 


El 


POP 


H 


.; START ADDR 


700F 


3EF0 


MVI 


A, 0F0H 


i STRIP RIGHT 


7011 


A5 


ANA 


L 


i 4 BITS 


7012 


6F 


MOV 


L, A 


; FROM START ADDR 


7013 


0602 


MVI 


B, 2 


; SKIP TWO LINES 


7015 


CD9970 


CALL 


PBOTM 


i TO GET STARTED 



PAGE LOOP 



7018 E5 


DUMP2 : 


PUSH 


H 


7019 &€&7 




MVI 


B, 7 


701B CDA270 




CALL 


LSKIP 


701E 21AA70 




LXI 


H, HEAD 


7021 0649 




MVI 


B, 73 


7023 4E 


DUMP3 : 


MOV 


C M 


7024 CD503C 




CALL 


CO 


7027 23 




I NX 


H 


7028 05 




DCR 


B 


_,, 929 C22370 




JNZ 


DUMP3 


J2C El 




POP 


H 



SAVE DUMP POINTER 

7 LINE SKIP 

DO IT 

GET ADDR OF PRINT LINE 

GONNA PRINT 73 CHARS 

GET NEXT CHAR 

PRINT IT 

BUMP TO NEXT CHAR 

DECREMENT COUNTER 

DO ANOTHER IF NEED BE 

RESTORE DUMP POINTER 



PRINT A PAGE OF MEMORV 
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702D CDC83C 
7030 0639 



CALL CRLF 
MVI B, 57 



EMPTY LINE 

57 LINES TO PAGE BOTTOM 



PRINT A LINE OF MEMORY (16 BVTEb! 



PRINT THE ADDR 
REMEMBER STARTING BYTE 

A blank: SPACE 
GET NEXT BYTE 

PRINT AS HEX 
BUMP POINTER 
CHECK FOR 

MULTIPLE OF 16 
JUMP NO 
PRINT A BLANK 

AND ANOTHER 
GET AN ASTER IK 

PRINT IT 
GET BEGINNING ADDR AGAIN 



GET NEXT BYTE 

IF BLANK OR HIGHER 

THEN OK 
ELSE MAKE IT BLANK 
IF \ OR LESS 

THEN OK 

ELSE FORCE A BLANK 

PRINT THE CHAR 

POINT TO THE NEXT ONE 

CHECK FOR 

END OF LINE 
; JUMP NOT YET 
; GET AN ASTER IK 
: PRINT IT 

DECREMENT LINE COUNTER 
CHECK FOR 256 BYTE BREAK 



7032 CDBA3D 


DUMPS : 


CALL 


LADR 


i 


7035 E5 




PUSH 


H 




7036 CD4E3C 


DUMPS : 


CALL 


BLK 




7039 7E 




MOV 


A, M 




703A CDC23D 




CALL 


LBYTE 




703D 23 




I NX 


H 




703E 3E0F 




MVI 


A, 0FH 




7040 A5 




ANA 


L 




7041 C23670 




JNZ 


DUMPS 




7044 CD4E3C 




CALL 


BLK 




7047 CD4E3C 




CALL 


BLK 




704A 0E2A 




MVI 


C.. ''*'' 




704C CD503C 




CALL 


CO 




704F El 




POP 


H 






i INTERPRET 


BYTES 




7050 4E 


DUMP? : 


MOV 


C, M 




7051 3E1F 




MVI 


A, 1FH 




7053 B9 




CMP 


C 




7054 DA5970 




JC 


DUMPS 


•• 


7057 0E20 




MVI 


C- '' '" 


■ 


7059 3E5C 


DUMPS : 


MVI 


A, -'V 




705B B9 




CMP 


c 




705C D26170 




JNC 


DUMP9 


.' 


705F 0E2O 




MVI 


C- "' '' 




7061 CD503C 


DUMP9 : 


CALL 


CO 




7064 23 




I NX 


H 




7065 3E0F 




MVI 


A, 0FH 




7067 A5 




ANA 


L 


.: 


7068 C25070 




JNZ 


DUMP? 




706B 0E2A 




MVI 


C '*' 




706D CD503C 




CALL 


CO 




7070 CDC83C 




CALL 


CRLF 




7073 05 




DCR 


B 


i 



7074 7D 
- ,, <i?5 B7 

S76 C23270 
7079 CDC83C 
707C 05 



MOV A, L 
ORA A 
JNZ DUMPS 
CALL CRLF 
DCR B 



GET LOW BYTE 
SET THE FLAGS 
JUMP NO BREAK 
ELSE A BLANK LINE 
DECREMENT LINE COUNTER 
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707D 
707E 
7081 
7084 
7087 
708A 



2B 

CD9F3D 

D28D70 

CD9970 

CDC83C 

C33E3C 



DCX H 
CALL HILO 
JNC DUMPA 
CALL PBOTM 
CALL CRLF 
JMP LER 



ADJUST H 

CHECK FOR FINISH 

JUMP NOT VET 

GET TO BOTTOM OF PAGE 

SKIP A LINE 

RETURN TO MONITOR 



CHECK FOR BOTTOM OF PAGE 



708D 
708F 
7090 
7093 
7096 



3E13 

90 

DA3270 

CD9970 

C31870 



DUMPA : 



7099 CDA270 
709C 0E2D 
709E CD503C 
70A1 C9 



PBOTM : 



MVI A, 19 
SUB B 
JC DUMPS 
CALL PBOTM 
JMP DUMP2 



CALL 
MVI 
CALL CO 
RET 



LSKIP 
C, '-'' 



NEED 19 MORE LINES 

TO CONTINUE ON THIS PAGE 

JUMP MORE THAN 19 

PUT A BOTTOM ON THE PAGE 

GET NEXT PAGE STARTED 

PAGE BOTTOM ROUTINE 
SKIPS TO LAST LINE 
AND PRINTS A DASH 



70A2 CDC83C 

5A5 05 
/0A6 C2A270 
70A9 C9 



LSKIP: 



CALL CRLF 
DCR B 
JNZ LSKIP 
RET 



SKIPS FORWARD 
NUMBER OF LINES 
IN REG B 



70AA 41444452 HEAD: 
70AE 20202020 
70B2 20312020 
70B6 32202033 
70BA 20203420 
70BE 20352020 
70C2 362020 
70C5 37202038 
70C9 20203920 
70CD 20412020 
70D1 42202043 
70D5 20204420 
70D9 20452020 
70DD 46202020 
70E1 302E2E2E 
70E5 2E352E2E 
70E9 2E2E412E 
70ED 2E2E2E46 
70F1 OD 
70F2 0A 



DB 



DB 



DB 



DB 
DB 



•ADDR 



1 



6 



8 



ABC 



0. 



A. 



F- 



ODH 
OAH 



CARRIAGE RETURN 
LINE FEED 



"'■<I00 



END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB45 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 £3(8080 □ 3000 



(use additional sheets if necessary) 



ASCII Display 

This routine expects two or three hex parameters. The first 
and second (16 bits) specify the bounds of a memory area to be 
displayed on the console device. The contents of these memory 
locations are interpretted as ASCII characters (MSB ignored). 



Console device 



9 monitor routines 



Two or three hex numbers from the console device 



Display on the console device 






Registers Modified: 
A,B,C,D,E,H,L 



RAM Required: 

3 bytes 



ROM Required: 

421 bvtes (or RAM) 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

B6700/8080 Cross Assembler V 2 



.3 



Programmer: 

Gerhard Moertel , S.A. Nilsson 



Company: Universitaet Karlsruhe 

Institut fuer Informatik 



Address: 



Zirkel 2 

7500 Karlsruhe 1, GERMAN f 



IV 



98-034C 

4-267 
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Ref.#AA10 



INTEL 8 USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 O8008 138080 D8048 D8085 D Other. 



. (use additional sheets if necessary) 



RAM CHECK 

Writes alternating Vs and 0's into all RAM locations then reads them 
and writes the two character result on a model 32 Teletype. Modifiable 
to ASR33 or LA-36, Decwriter. Can also check ROM read. 



8080A, 4k ROM, any amount of RAM, 8251 USART, selectable baud 
rate clock. 



The above program. 



Starting address of RAM (resident in ROM). 



Hex address and two 6's followed by two L's if address will read and 
write both l's and 0*s. 



Registers Modified: 

A, B, C,D,E,H, L 


Programmer: 

Scheer 


RAM Required: 

Any amount 


Analog Precision, INC. 


ROM Required: 
4k 


Address: 

1620 N. Park 


Maximum Subroutine Nesting Level: 
-0- 


City: 

Tucson 


Assembler/Compiler Used: 
MDS VI. 


State: 

Arizona 85719 



© Intel Corporation, 1976 
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insite INTEL: users library submittal form 



Ref.# AA11 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 [38080 08048 D8085 □ Other. 



(use additional sheets if necessary) 



MEMORY TEST PROGRAM/ KYBD ENTRY OF START AND END VALUES 

Provides extensive bit pattern tests to RAM memory located in any 
memory space higher than 300H. 



Intel lee equipment with kybd and printer 



MDS-800 Monitor 



Start address as 4 hex digits and end address as 4 hex diqits f 
console. 



rom 



Printout of all error Icoations along with expected and found val 



ues. 



Registers Modified: 
ALL 



RAM Required: 
About 3/4 K bytes 



ROM Required: 
Monitor Subroutines 



Maximum Subroutine Nesting Level: 
12 



Assembler/Compiler Used: 
8080 M PS Macro Assembler V. in 

© Intel Corporation, 1976 



Programmer: 
Floyd L. Nordin 



Company: 

Nordin Enterprises 



Address: 
P.O. Box 1277 



City: 
Cupertino 



State: 
CA 95014 



98-034D 
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iny 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AB46 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 BJ8080 O 3000 



(use additional sheets if necessary) 



Basic CPU state vector maintenance in a multiprogrammed environment. 

These three subroutines can be used by an operating system to maintain 
CPU state vectors when transferring control from one program to another. 
The subroutines use RAM locations LPnx to store the x state vectors of 
program n. Round robin program sequencing is used. 



None 



None 



None 



Multiprogrammed state vector maintenance 



Registers Modified: 



All 



RAM Required: 



30 bytes 



ROM Required: 



83 x bytes 



Maximum Subroutine Nesting Level: 
Unlimited 



Assembler/Compiler Used: 
MicroPac # 80/A Micro Assembler 



Programmer: 
Stanley J. Kaczynski 



Company: 

Varian/Extrion 



Address: 

P.O. Box 1226/Blackburn Ind. Park 
mrmppfit-g^ ma mq^ft 
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; REF. NO. AB46 

i PROGRAM TITLE BASIC CPU STATE VECTOR MAINTENANCE 



0000 E3 LC12: XTHL 




0001 2284O0 


SHLD 


LP1P 


0004 El 


POP 


H 


0005 228600 


SHLD 


LP1H 


0008 EB 


XCHG 




0009 228800 


SHLD 


LP1D 


000C C5 


PUSH 


B 


000D El 


POP 


H 


000E 228A00 


SHLD 


LP1B 


0011 F5 


PUSH 


PSW 


0012 El 


POP 


H 


0013 228C08 


SHLD 


LP1A 


0016 2A9600 


LHLD 


LP2A 


0019 E5 


PUSH 


H 


001A Fl 


POP 


PSW 


31B 2A9400 


LHLD 


LP2B 


001E E5 


PUSH 


H 


001F CI 


POP 


B 


0020 2A9200 


LHLD 


LP2D 


0023 EB 


XCHG 




0024 2A8E00 


LHLD 


LP2P 


0027 E5 


PUSH 


H 


0028 2A9000 


LHLD 


LP2H 


002B C9 


RET 




002C E3 LC23: XTHL 




002D 228E00 


SHLD 


LP2P 


0030 El 


POP 


H 


0031 229000 


SHLD 


LP2H 


0034 EB 


XCHG 




0035 229200 


SHLD 


LP2D 


0038 C5 


PUSH 


B 


0039 El 


POP 


H 


003A 229408 


SHLD 


LP2B 


003D F5 


PUSH 


PSW 


003E El 


POP 


H 


003F 229600 


SHLD 


LP2A 


0042 2AAO00 


LHLD 


LP3A 


0045 E5 


PUSH 


H 


0046 Fl 


POP 


PSW 


0047 2A9E00 


LHLD 


LP3B 


34A E5 


PUSH 


H 


«/04B CI 


POP 


B 


004C 2A9C00 


LHLD 


LP3D 


004F EB 


XCHG 
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0050 

0053 
0054 
0057 
0058 
0059 
005C 
005D 

0060 
0061 

0064 
0065 

0069 
006A 
006B 
006E 

0071 

0072 
0072 
0076 
277 
0078 
007B 
007C 
007F 

0080 

0083 
0084 
0086 
0088 
008A 
008C 
008E 

0090 

0092 
0094 
0096 
0098 
009A 
009C 
009E 

00A0 
0000 



2A9800 

E5 

2A9A00 

C9 

E3 

229800 

El 

229A00 

EB 

229C00 

C5 

El 

229E00 

F5 

El 

22A000 

2A8C00 

E5 

Fl 

2A8A00 

E5 

CI 

2A8800 

EB 

2A8400 

E5 

2A8600 

C9 

001E 

821E 
041E 
061E 
081E 
0A1E 
0C1E 
0E1E 
101E 
121E 
141E 
161E 
181E 
1A1E 
1C1E 



LC31 



LP1P 
LP1H 
LP1D 
LP1B 
LP1A 
LP2P 
LP2H 
LP2D 
LP2B 
LP2A 
LP3P 
LP3H 
LP3D 
LP3B 
LP3A 
END 



LHLD 

PUSH 

LHLD 

RET 

XTHL 

SHLD 

POP 

SHLD 

XCHQ 

SHLD 

PUSH 

POP 

SHLD 

PUSH 

POP 

SHLD 

LHLD 

PUSH 

POP 

LHLD 

PUSH 

POP 

LHLD 

XCHQ 

LHLD 

PUSH 

LHLD 

RET 

DW 

DW 

DW 

DW 

DW 

DW 

DW 

DW 

DW 

DW 

DW 

DW 

DW 

DW 

DW 



LP2P 

H 

LP3H 



LP3P 

H 

LP3H 

LP3D 

B 

H 

LP3B 

PSW 

H 

LP3A 

LP1A 

H 

PSW 

LP1B 

H 

B 

LP1D 

LP1P 

H 

LP1H 

17000Q 
17002Q 
17004Q 
17006G! 
17010Q 
17012Q 
170140 
17016Q 
17020G! 
17022Q 
17024Q 
17026Q 
1703OQ 
17032Q 
17034Q 
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MICROCOMPUTER USER'S 

LIBRARY SUBMITTAL FORM "*■ no. acm 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D 4040 D 8008 MS 8080 



(use additional sheets if necessary) 



MP8 208 A/D Converter Routine 



Program functions as an interface between user's PL/M 
program and the Burr-Brown MP8208 A/D converter on an 
Intellec 8/M0D 80. 



Burr-Brown MP8208 A/D converter Intellec 8/M0D 80 



PL/M 80 cross-compiler 



A/D Channel number 



Address-type variable containing 12 bit value from 
selected A/D channel. 



Registers Modified: 

A,B,H,L 


Assembler/Compiler Used: 

PL/M 80 


RAM Required i u..4-~. ~-p r> a »* j 

1 byte or RAM used 
for storage, 2 bytes for stack 


Programmer: 

Jeff Stewart 


ROM Required: Program occupies 17 
bytes of ROM or RAM. 


Company: 

Parke, Davis 


Maximum Subroutine Nesting Level: 

1 


Address: 2 8 00 Plymouth Road 

Ann Arbor, Mich. 48106 



98-034B 
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00001 
00002 
00003 
04 
00005 
00006 
00007 
00008 
00009 

00010 2 

00011 2 

00012 2 
00013 
00014 
00015 
00016 
00017 
00018 
00019 
00020 
00021 
00022 
00023 
00024 
00025 
NO PROGRAM 



/♦REF. NO. AC14 V 

/♦PROGRAM TITLE MP8208 A/D CONVERTER ROUTINE */ 

DECLARE ORG LITERALLY '400H'; 

DECLARE ATODASMM LITERALLY '406H'; 
ORG: 

DECLARE ATODASM DATA ( 26H, OFFH, 79H, 87H, 6FH, 7EH, 2CH, 46H , 0C9H) ; 

DECLARE TEMP BYTE, VALUE ADDRESS; 
ATODREAD: PROCEDURE(NUMBER) ADDRESS; 

DECLARE NUMBER BYTE; 

GO TO AT3DASMM; 

END ATODREAD; 
START: 

TEMP=INPUT(0); 

VALUE=ATODREAD(TEMP AND OFH); 

IF ((TEMP AND 80H)=0) THEN 

DO; 

output (offh) =low (value); 
end; 

ELSE 

do; 

output ( offh) =high( value); 

END; 

GO TO start; 
EOF; 
ERRORS 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AC15 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 D 4040 D 8008 &MJ080 



(use additional sheets if necessary) 



"PAGE" 



To provide a page break for a Tektronic #4010 
graphics terminal. 



The required hardware is an Intel MDS 800 and 
a Tektronic #4010 CRT 



The required software is MDS Monitor Ver 1.1. The follow- 
ing changes are needed: Insert a CALL to EE00H in FD59 
6 FD5B in the Monitor. These instructions are to be 
replaced by "CD, 00, EE, 00" IN ORDER 

When the end of a page is reached depressing the letter 
"E" on the keyboard will erase the page and allow output 
to continue. Substituting 00 at F000 will disable this 
routine. 



Not Applicable 



Registers Modified: 



RAM Required: 

6 locations 



ROM Required: 

179 locations 



Maximum Subroutine Nesting Level: 

2 



Assembler/Compiler Used: 

ISIS 8080 Macro Assy. VI. 



Programmer: 



Steve Weisbrod 



Company: 



Medtronic, Inc. 



Address: 



bl^u tiarle Brown Dr. 



Mpls. MN 



55430 
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EE00 
F809 
F803 
EE00 
EE01 
EE02 
EE03 
EE06 
EE08 
EE0B 
EE0E 
EE10 
EE13 
EE16 
EE18 
EE1B 
EE1E 
€21 
<iE23 
EE26 
EE28 



F5 

D5 

E5 

3A02F0 

FE53 

C21EEE 

3A03F0 

FE50 

C21EEE 

3A04F0 

FE7C 

C21EEE 

CA35EE 

2102F0 

3652 

2103F0 

3650 

2104F0 



; REF. NO. AC15 
PROGRAM TITLE PAGE BREAK FOR TEKTRONIX 4010 I/O GRAPHICS TERM IN 



"PAGE" 



THE FUNCTION OF THIS PROGRAM IS TO 
PROVIDE A PAGE BREAK FOR A TEKTRONIC #4010 
GRAPHICS TERMNAL. 

THE REQUIRED HARDWARE IS A INTEL MDS 800 
AND A TEKTRONIC #4010 CRT 

THE REQUIRED SOFTWARE IS MDS MONITOR 
VER 1. 1 . THE FOLLOWING CHANGES ARE 
NEEDED: INSERT A CALL TO EEOOH IN 
PLACE OF THE TWO INSTRUCTIONS AT 
FD59 & FD5B IN THE MONITOR 
THESE INSTRUCTIONS ARE TO BE REPLACED 
BV "CD, 00, EE, 00" IN ORDER 

WHEN THE END OF A PRGE IS REACHED DEPRESSING 
THE LETTER "E" ON THE KEVBOARD WILL 
ERASE THE PAGE AND ALLOW OUTPUT TO 
CONTINUE. SUBSTITUTING OO AT 
F000 WILL DISABLE THIS ROUTINE 

ORG OEEOOH 
CO EQU OF809H 
CI EQU 0F803H 
PAGE: PUSH PSW 
PUSH D 
PUSH H 

LDA 0F002H ; 
CPI 53H ; 
JN2 SETUP 
LDA 0F003H 
CPI 50H 
JNZ SETUP 
LDA 0F004H 
CPI 7CH 
JNZ SETUP 
JZ TEST1 
SETUP: LXI H, 
MVI M, 53H 
LXI H, OF003H 
MVI M, 50H 
LXI H, 0F004H 



CHECK TO SEE IF THIS IS THE 
FIRST TIME THROUGH. 



0F002H; SETUP FIRST TIME 
; THROUGH. 
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EE2B 367C 


MVI M, 7CH 


EE2D 2100F0 


LXI H, 0F000H 


EE30 3601 


MVI M, 01H 


EE32 23 


INX H 


EE33 3600 


MVI M, 00H 


EE35 2100F0 


TEST1: LXI H, 0F0O0H; TEST FOR OR 


EE38 ?E 


MOV A, M 


EE39 FE01 


CPI 01H 


EE3B CA42EE 


JZ TEST2 


EE3E C5 


PUSH B 


EE3F C37DEE 


JMP DONE 


EE42 79 


TEST2 : MOV A, C ; TEST FOR LF 


EE43 E67F 


AN I 7FH 


EE45 FE0A 


CPI 0AH 


EE47 C5 


PUSH B 


EE48 C253EE 


JNZ INPUT 


EE4B 2101F0 


LXI H, 0FO01H 


EE4E 3601 


MVI M, 01H 


EE50 C37DEE 


JMP DONE 


EE53 2101F0 


INPUT: LXI H, 0F001H 


EE56 7E 


MOV A, M 


E57 FE00 


CPI 00H 


EE59 CA7DEE 


JZ DONE 


EE5C 3600 


MVI M, OOH 


EE5E 1E06 


MVI E, 06H 


EE60 ID 


L00P4:DCR E 


EE61 CA6DEE 


JZ BREAK 


EE64 06FF 


MVI B, 0FFH 


EE66 05 


L00P5: DCR B 


EE67 C266EE 


JNZ LOOPS 


EE6A C360EE 


JMP L00P4 


EE6D DBF7 


BREAK: IN 0F7H ; ANYTHING ON INPl 


EE6F E602 


AN I 02H 


EE71 CA7DEE 


JZ DONE 


EE74 DBF6 


IN 0F6H ; IS IT A BREAK? 


EE76 E67F 


AN I 7FH 


EE78 FE60 


CPI 60H 


EE7A CC86EE 


CZ WAITE 


EE7D CI 


DONE: POP B 


EE7E El 


POP H 


EE7F Dl 


POP D 


EE80 Fl 


POP PSW 


EE81 DBF7 


IN 0F7H ; INSTR'N FM MON 


EE83 E601 


AN I 01H 


EE85 C9 


RET 


EE86 CD03F8 


WAITE: CALL CI ; "E" DEPRESSED? 


E89 E67F 


AN I 7FH 


l:£8B FE45 


CPI 'E' 


EE8D C286EE 


JNZ WAITE 


EE90 C5 


ERASE : PUSH B ; SAVE CHAR 



FOR GRAPHICS OR DISABLE 
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EE91 


0E1B 


MVI C1BH j 


i ERASE CRT 


EE93 


CD09F8 


CRLL CO 




EE96 


0EOC 


MVI C, 0CH i 


RESET CRT 


EE98 


CD09F8 


CALL CO 




EE9B 


1602 


DELRV: MVI 


D, 82H j TIME DELAV FOR 






;CRT ERRSE 


RECOVERV 


EE9D 


?A 


LOOP1: MOV 


A, D 


EE9E 


FE00 


CPI 00H 




EEA0 


CAB3EE 


JZ RESTR 




EEA3 


15 


DCR D 




EEA4 


1EFF 


MVI E, 0FFH 




EEA6 


ID 


L00P2: DCR 


E 


EEA7 


CA9DEE 


JZ LOOP1 




EEAA 


06FF 


MVI B, 0FFH 




EEAC 


05 


L00P3: DCR 


B 


EEAD 


C2RCEE 


JNZ L00P3 




EEB0 


C3A6EE 


JMP L00P2 




EEB3 


CI 


RESTR: POP 


B ; RESTORE 






i CHAR FOR NEW PAGE 


EEB4 


C9 


RET 




0000 




END 
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MICROCOMPUTER USER'S 

LIBRARY SUBMITTAL FORM Ref N ° Acie 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 &8080 



(use additional sheets if necessary) 



CRTBZ 



Transmits an ENQ (E c ) from the computer to CRT terminal 
and waits til an ACK (F c ) is received. Permits hand- 
shaking between CRT S computer for timing synchronization. 



MDS (Intellec), 2640 CRT terminal (Hewlett Packard) 
RS232C cable 



1/0 subroutines in Intellec MDS Monitor CI and CO 



None 



Permits smooth interfacing of 2640 CRT with MDS 
otherwise MDS dumps information at a faster rate 
(9600 baud) than the CRT can take (2400 baud maximum), 
consequently CRT will skip or delete some information. 



NOTE: CRTBZ is ordered as one 
program with GET. Ref. No. 
AC16 refers to both routines. 



Registers Modified: 

A, C and FLAGS 



RAM Required: 

14 bytes 



ROM Required: 

None 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: Intellec MDS 

Assembler Version 1.0 



Programmer: 

Ahmed Muneeruddin 



Company: 

Management Business Machines 



Address: 58 6 7 Broadway 

Denver, Colorado 80216 



98-0346 
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intel 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. 



AC16 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 E\ 8080 



(use additional sheets if necessary) 



GET 

Read characters from CRT (2640 HP) in block mode 
strapped for line S format mode on; store the characters 
at a specified place. The number of unprotected fields 
to be read is selected by the user (i.e. the length of 
the block) . 



Intellec MDS system, 2640 CRT terminal (HP) 
RS232C cable 



MDS 1/0 routines: CI, CO 

CRT Control Routines: CRTBZ, ENABL, TRIGR, RESET, 

CRLF, PRINT 

B must contain number of unprotected fields to be read 

HSL should contain starting address in RAM where 
information can be read. 



Information read from CRT memory is available in 
specified area of RAM with end of block identified 
with a record separator rs . Each unprotected field 
is separated with a carriage return. At the end of 
input process, a message appears for the CRT opera- 
tor to turn off the block mode key on the CRT. 



NOTE: GET is ordered as one — 
program with CRTBZ. Ref. No. 
AC16 refers to both routines. 



Registers Modified: 

A,C,B,H£L, S FLAGS 



RAM Required: 

4C bytes + storage for other 
subroutines 



ROM Required: 

NONE 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: jwjjjg g 

Macro Assembler Version 1.0 



Programmer: 

Ahmed Muneeruddin 



Company: 

Management Business Machines 



Address: 5867 Broadway 

Denver, Colorado 8 216 



98-034B 
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MICROCOMPUTER USERS 

LIBRARY SUBMITTAL FORM R ^ no. ab 48 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 □ 8008 XX 8080 



(use additional sheets if necessary) 



Disasembler 



This program transforms machine codes in memory to 
a listing of: 

1. Addresses 

2. Machine codes (1,2 or 3 bytes) depending on the 
type of instruction. 

1. Addresses when applicable (JMP and Call) 



TTY on port and 1 

Machine line INTELLEC 8 /MOD 8 

MONITOR VER 3.0 (on PROMS) 

Intellec 8 M0D/8 Text Editor VER4.0 

Macro Assembler Ver 2.0 
Monitor Ver 3.0 

Start of this program: 

G0 3 7ED 

The TTY types DISASEMBLER and expects two HEX parameters 

of the memory dump to be disasembled, typed on the TTY. 



Registers Modified: 

A,B,C,D,E,H,L 



Assembler/Compiler Used: Intellec 8 
tacro Assembler 2.0 Monitor 

i'er 3-0 



RAM Re. 



2T£ a Bytes 



ROM Required: 

MONITOR VER3-0 1024 BYT 



Maximum Subroutine Nesting Level: 

2 



Programmer: 

Manuel Puigbo 



Company: 



E.lecma 



Address: Ricardo Calvo, 13 

Barcelona (6) Spain 



98-034B 
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MICROCOMPUTER USER'S 

LIBRARY SUBMITTAL FORM **. no. ab 49 



D 4004 □ 4040 □ 8008 S 8080 □ 3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



ERLIST 



Will search through a file assumed to be all 8080 macro 
assembler output list file and will copy all lines containing 



errors to the console. 



MDS-800 and MDS-DOS with 32K RAM 



Output 
Results 



ISIS (NOTE: will not run under VI. 0) 



File Name 
(ERLIST FILENAME. EXT) 



Lines which contain an error code to the console 



Registers Modified: 
All 



RAM Required: 
32K MDS 



ROM Required: 



Maximum Subroutine Nesting Level: 
1 



Assembler/Compiler Used: 
ASM80 - VI. 1 



Programmer: 
Barry Yarkoni 



Company: 



Address: 



57 West Timonium Road 
Timonium, Md . 21093 



98-034C 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM Ref No 



AB50 



D 4004 □ 4040 □ 8008 S 8080 □ 3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



EXAMIN 



Copies "N" lines at a time from a specified file to the MDS 
console. Hitting the space bar will type the next 10 lines, 
An "E" will terminate the program at any time. 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



MDS-800, MDS-DOS, console, and 32K RAM 



32K ISIS, any version 

MDS monitor, VI. 2 or greater 



FILE NAME 

EXAMIN FILENAME. EXT (CR) : program will request console input 



Output 
Results 



Directly to console, 10 lines at a time 



Registers Modified: 
All 


Assembler/Compiler Used: 
ASM80 - VI. 1 


RAM Required: 
32K MDS 


Programmer: 

Barry Yarkoni 


ROM Required: 


Company: 


Maximum Subroutine Nesting Level: 
1 


Address: ,--, „ , m . . _ , 

57 West Timonium Road 
Timonium, Md. 21093 



98-034C 

4-293 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. No. AB51 



□ 4004 □ 4040 □ 8008 8080 
Program 

Tjtle Ice-80 Disassembler 



(use additional sheets if necessary) 



Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



A subroutine to be used as a ' 'MDS call 1 ' in Ice-80 
command language. 

Translates control block information to assembly 
statements that are output to selected list device. 

Intellec MDS and Ice-80. 



Ice-80 software driver & RAM based version 2.0 or 3.0 
or disk based version 1.0. 

Information stored in control block by Ice-80 when 
returning form emulation mode. 



Assembly statements are output to selected list device as 
the instructions are executed by the Ice-80 CPU. 



Registers Modified: 
All 



RAM Required: 

1121 bytes 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

MDS Assembler 



Programmer: 

Ove Andersson 



Company: 

Intel Scandinavia A/S 



Address: 



Lyngbyvej 32F,II 

?inn rnponharjon <h . npnmarlf 

9%p3g5 



iny 



MICROCOMPUTER USER'S Dec 1976 
LIBRARY SUBMITTAL FORM R * f ^l 



□ 4004 D 4040 D 8008 B 8080 



Program 
Title 

Function 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



Required 
Hardware 



DELETE COMMENTS 



Reads 8080 source tape from assigned reader (uses monitor RI routine) 
f^ „ *!T all u coinments - A reduced source tape (instructions only) 
is punched on the assigned punch device (uses monitor P O routine; 
can be co-resindent with 8080 assembler, etc.) 



Nation "mL^ "f ^V 8 PUnCh "* rSader ' ±S the minimum ^fig- 
uration. Hl gh speed punch and reader may be used if available. 



MDS 800 System Monitor 



Program calls RI (0F806M) 
Requires character read to be in REG C 
Requires carry Bit set if reader has timed out. 
(This is as per the monitor routine.) 



Program calls P O (0F80CH) 

Character to be punched is in REG C 

At end of tape (reader times out) program returns control to the monitor. 



Registers Modified: 
A,B,C,FLGS 



RAM Required: 
160 Bytes 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

8080 MDS Assembler V.1.0 



Programmer 

I.E. Powers 



Company: 

Plessey Radar 



Address: 

Cheapside , Liverpool 
L2 2EA (England) 



98034B 
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3000 




3000 


HF 


3001 


329E30 


3004 


329F30 


3007 


32H030 


300A 


CD4B30 


300D 


CD06F8 


3010 


DA9A30 


3013 


0601 


3015 


4F 


3016 


E67F 


3018 


FE7F 


301A 


CR0D30 


301D 


FE00 


301F 


CAOD30 


3022 


FE0D 


924 
^827 


CH5730 


FE0fl 


3029 


CA6638 


302C 


FE3B 



REF. NO. AB52 

PROGRAM TITLE DELETE COMMENTS 



DELETE COMMENTS PROGRAM I E POWERS 



1. 1 



PROGRAM READS 8080 SOURCE TAPE FROM ASSIGNED READER 

ALL COMMENTS PREFIXED WITH ; ARE DELETED AND ALL 

RUBOUT AND NULL CHARACTERS ARE IGNORED 

THE RtMAINING CHARACTERS ARE OUTPUT ON THE ASSIGNED 

PUNCH DEVICE 

LINES BEGINNING WITH ; ARE DELETED COMPLETELEV 

COMMENTS FOLLOWING INSTUCTIONS ARE DELETED WITHOUT 

AFECTING THE FOLLOWING CR LF SEQUENCE 

OPERAT I NG PROCEDURE : - 

LOAD ME BV TVPING RO ON THE CONSOLE DEVICE 

PLACE THE TAPE TO BE PROCESSED IN THE READER AND 

TYPE G300O ON THE CONSOLE 

AFTER PUNCHING THE REDUCED TAPE I RE-ENTER THE MONITOR 

TEST PROCEDURE :- 

ASSEMBLE TEST TAPE TO OBTAIN AN OBJECT TAPE 

USE MV OBJECT TAPE TO PROCESS TEST SOURCE TAPE 

ASSEMBLE THE REDUCED SOURCE TAPE 

BOTH OBJECT TAPES SHOULD CORRESPOND EXACTLY 



BEGIN 



READ : 



ORG 

XRA 

STA 

STA 

STA 

CALL 

CALL 

JC 

MVI 

MOV 

AN I 

CPI 

JZ 

CPI 

JZ 

CPI 

JZ 

CPI 

JZ 

CPI 



3000H 

A 

IGLIN 

IGTXT 

NEWLI 

PUL 

0F806H 

EOJ 

B, 1 

C, A 
7FH 
7FH 
READ 



READ 

6DH 

CRET 

0AH 

LINF 

3BH 



CLEAR ACC 

CLEAR IGNORE LINE FLAG 

CLEAR IGNORE TEXT FLAG 

CLEAR NEWLINE FLAG 

PUNCH LEADER 

READ CHAR FROM RI 

IF READER TIMES OUT - GOTO END OF JOB 

SET OUTPUT CHARACTER COUNT TO 1 

MOVE INPUT CHAR TO A 

IGNORE PARITY BIT 

CHECK FOR RUBOUT 

IGNORE RUBOUT -GET NEXT CHAR 

CHECK FOR NULL 

IGNORE NULL 

CHECK FOR CR 

CR DETECTED 

CHECK FOR LF 

LF DETECTED 

CHECK FOR i 



4-298 



I_.S 8630 MACRO ASSEMBLER, VI. @ 



PAGE 2 



302E CR7A30 




.JZ 


SEMCO 


.; ; DETECTED 




; ASSUME 


CHAR OTHER THAN 


CR LF OR ; 


3031 AF 




XRA 


A 




3032 32A030 




STA 


NEWLI 


.; CLEAR NEWLINE FLAG 


3035 3R9E30 




LDA 


IGLIN 


i CHECK IGNORE WHOLE LINE FLAG 


3038 FE00 




CPI 







303A C20D30 




JNZ 


READ 


.: FLAG SET -IGNORE CHAR 


303D 3A9F30 




LDA 


IGTXT 


i CHECK IGNORE TEXT FLAG 


3040 FE00 




CPI 







3042 C20D30 




JNZ 


READ 


.; FLAG SET -IGNORE CHAR 




.; MO FLAGS SET 


-PRINT CHAR ON PUNCH 


3045 CD4F30 


PRI : 


CALL 


PO 




3048 C30D30 




JMP 


RERD 


.; GET NEXT CHAR 




i PUNCH 


LEADER 


ROUTINE 




304B 0664 


PLIL : 


MVI 


B, 100 


; SET LENGTH OF LEADER COUNT 


ZC04D 0E00 




MVI 


C 


.; SET R NULL CHAR FOR OUTPUT 




.; PUNCH 


OUTPUT 


ROUTINE 




304F CD0CF8 


PO : 


CALL 


0F8OCH 


; CALL PUNCH OUTPUT IN MONITOR 


3052 05 




DCR 


B 


.; DECREMENT CHAR COUNT 


3053 C24F30 




JNZ 


PO 


.; JUMP BACK IF MORE TO PUNCH 


3056 C9 




RET 






357 3A9E30 


CRET : 


LDA 


IGLIN 


; CHECK IGNORE WHOLE LINE FLAG 


305A FE00 




CPI 







305C C20D30 




JNZ 


RERD 


.; FLAG SET -IGNORE CR 


305F AF 




XRA 


R 


;FLHQ NOT SET -ZERO R 


3060 329F30 




STA 


IGTXT 


i CLEAR THE IGNORE TEXT FLAG 


3063 C34530 




JMP 


PRI 


i OUTPUT THE CHAR 


3066 3E01 


LINF: 


MVI 


fi, 1 


i WE ARE STARTING A NEW LINE 


3068 32R030 




STA 


NEWLI 


; SET NEWLINE FLAG 


306B 3A9E30 




LDA 


IGLIN 


.; CHECK IGNORE WHOLE LINE FLAG 


306E FE00 




CPI 







3070 CA4530 




JZ 


PRI 


;FLAG NOT SET -OUTPUT LF 


3073 AF 




XRA 


R 


; FLAG SET -IGNORE LF 


3074 329E30 




STA 


IGLIN 


.; RESET THE FLAG 


3077 C30D30 
307A 3A9E30 


SEMCO : 


JMP 
LDA 


RERD 
IGLIN 


i GET NEXT CHAR 

j CHECK IGNORE WHOLE LINE FLAG 


307D FE00 




CPI 







307F C20D30 




JNZ 


RERD 


; IGNORE COMMENTS WITHIN COMMEI 


3082 3AA030 




LDA 


NEWLI 


i CHECK NEWLINE FLAG 


3085 FE00 




CPI 







3087 CA9230 




JZ 


MID 


; NAT SET -MID LINE COMMENT 


308A 3E01 




MVI 


A, 1 


;FLAG SET WHOLE LINE IS COMMEI 


308C 329E30 




STA 


IGLIN 


; SET IGNORE WHOLE LINE FLAG 


308F C30D30 




JMP 


RERD 


; IGNORE ; AND GET NEXT CHAR 


3092 3E01 


MID: 


MVI 


fl, 1 


j HANDLE MID LINE COMMENT 


3094 329F30 




STA 


IGTXT 


j SET IGNORE TEXT ON THIS LINE 


097 C30D30 
^■09A CD4B30 


EOJ : 


JMP 
CRLL 


RERD 

PIJL 


; GET NEXT CHAR 

.; END OF JOB -PUNCH TRAILER 


309D C7 




RST 





.: BACK TO MONITOR 


309E 00 


IGLIN: 


DB 





.; IGNORE WHOLE LINE FLAG 



FLAG 
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309F 00 


IGTXT: 


DB 





30A0 00 


NEWLI : 


DB 





0000 




END 





IGNORE TEXT ON THIS LINE FLAG 
NEW LINE FLAG 
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Ref . # AB53 



insite " INTEL * USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 D 8080/8085 D 8086 D Other. 



— (use additional •harts If nacastary) 



TYIE 

Types a source file with the correct number of spaces inserted 
for each tab. Display can be "frozen" by typing any keyboard 
character, and unfrozen by a similar action. The program is 
terminated when a C is typed. 



MDS with Diskette 



ISIS-I 



File Name 



File Listing 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



Intellec 8080 
Macro Assembler VI. CI 



Programmer: 



Norman H. Azadian 



Company: 



System Development Corp, 



Address: 2500 Colorado Avenue 



City: 



Santa Monica 



State: 



California 90406 



6/79 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Dec. 1976 



Ref. 



AB54 



D 4004 D 4040 D 8008 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



i 



8080 



luw additional shMts if necessary ) 



SDK-80 keyboard monitor 



basic operating system for the SDK-80 microcomputer 
kit. allows loading program and execution of user 
programs as well as breakpoint and register examination 
and modification 



1. Intel SDK-80 microcomputer with I/O port installed 
at locations 0F4h to 0F7h. 

2. Keyboard and keyboard control circuit per schematic 
none additional 

keystrokes 



implementation of functions requested 



Register* Modified: 


Assembler/Compiler Used: 

MDS Isis-ASM80 VI. 


RAM Required: 

19 decimal locations 


Programmer: 

J.F. Jankura 


ROM Required: 

24A hexadecimal locations 


Company: 

General Electric 


Maximum Subroutine Nesting Level: 

5 levels 


Address: 

Nela Park, Cleveland, Oh. 



98-034B 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Dec. 1976 
Ref. AB55 



□ 4004 □ 4040 □ 8008 CX 8080 □ 3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



Disc Dump Routine for ICOM FDOS-II/MOD 80 floppy disc operating 
system. 

This routine provides a formatted dump of any portion of the 
floppy disc, in decoded ASCII, hexadecimal, or both. The 
user specifies the number of sectors to be dumped and the 
desired format. 

Intel! ec 8/MOD 80, ICOM floppy disc drive. 



Intellec monitor, ICOM FODS-11/mod 80 resident module. 



Unit no'., first sector and track to be dumped, no. of sectors 
to be dumped, and format (alpha, hex, or both). 



Formatted dump of disc. DD-marked sectors can not be dumped, 
so a message is printed to this effect. At the end of the 
dump, the user may rerun the program, or go to either the 
Intellec or FDOS monitor. 



Registers Modified: 



RAM Required: 

700 Bytes hex 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

PL/M vers 3.2 



Programmer: 

L.P.M. Payzant 



Company: 

Nova Scotia Technical College 



Address: P. 0. Box 1000, 

Halifax, Nova Scotia, Canada. 



98034C 
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/* REF. NO. AB55 */ 

•* PROGRAM TITLE DUMP ROUTINE <PL/M SOURCE) */ 

100HK /* DISC DUMP PROGRAM */ 

(* P- PHVZflNT, N. S. T. C. , AUGUST, 1976 ' */ 

DECLARE < UN IT, TRACK, SECTOR, CODE, PRINT, J, K, CHAR ) BYTE; 

DECLARE CACTTRACK, ACTSECT, EXPSECT, EXPTRACK) BYTE; 

DECLARE <NSECT,I) ADDRESS; 

DECLARE BUF <128> BYTE; 

DECLARE TRUE LITERALLY '0FFH', FALSE LITERALLY '©'; 

CICZ PROCEDURE BYTE; /* READ A CHARACTER */ 
GO TO 3803H; 
END CIC; 

COCK PROCEDURE <CHAR); /* PRINT A CHARACTER */ 
DECLARE CHAR BYTE; 
GO TO 3809H; 
END COC; 

SPACED PROCEDURE <NSPACES); /* PRINT N SPACES */ 
DECLARE <N, NSPACES> BYTE; 
DO N=l TO NSPACES; 
CALL COC<' '); 
END; 
END SPACE; 

RDISCX PROCEDURE BYTE; /+ READ A BVTE FROM THE DISC */ 
GO TO 3105H; 
END RDISC; 

PRINTNK PROCEDURE C NUMBER ); /* PRINT A BVTE IN HEX */ 
DECLARE i. NUMBER, CHAR) BYTE; 
CHAR=SHRC NUMBER, 4); 
IF CHAR>=10 THEN CHAR=CHAR+'A' -10; 

ELSE CHAR=CHAR+'0'; 
CALL COC < CHAR); 
CHAR=NUMBER AND 0FH; 
IF CHAR >= 10 THEN CHAR=CHAR+ A ' -10; 

ELSE CHAR=CHAR+'0'; 
CALL COC < CHAR); 
END PRINTN; 

PRINTAX PROCEDURE <STR I NGADDR, CRLFFLAG); /* PRINT A STRING */ 
DECLARE STR I NGADDR ADDRESS, < J, CRLFFLAG) BVTE; 
DECLARE <STRING BASED STRINGADDR) <70) BVTE; 
IF CRLFFLAG=1 THEN DO; 

CALL COCC0DH); /* CR */ 

CALL COC<0AH); /* LF */ 

END; 
J=0; 
DO WHILE STRING<J)<> '*'; 

CALL COCCSTRING<J)); 

J=J+1; 

END; 
END PR I NT A; 

READHEXK PROCEDURE ADDRESS; /* READ A HEX NUMBER TVPED AT THE CONSOLE W 
DEULHRE VAL ADDRESS, CHAR BVTE; 
VAL=0; 
DO WHILE TRUE; 
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CHAR=CIC; 

CRLL COC(CHRR>; 

IF (CHRR AND 7FH>=0DH THEN DO; 

CRLL COC(0RH>; 

RETURN VRL; 

END; 
CHRR=(CHRR AND 7FH>-'0'; 
IF CHAR>=0 AND CHAR <=9 THEN DO; 

VAL= ( 16*VAL > +CHAR; 

END; 
ELSE IF CHAR>=11H AND CHAR <=16H THEN DO; 

VAL= ( 16*VAL > +CHAR-7; 

END; 
ELSE CALL COC<07H>; /* RING BELL FOR NON-HEX CHARACTER */ 
END; 
END READHEX; 

DECLARE MSQ1 DATA ('DISC DUMP PROGRAM*' >, MSQ2 DRTA ('UNIT NO.? (0-3) %'>, 

M5G3 DATA ('STARTING TRACK? <00-4C) *'>,MSG4 DATA ( 'STARTING SECTOR? (1- 
1A) %'■>, MSG5 DATA ('NO OF SECTORS? (1-7D2) %'>, MSG6 DATA ( ' ALPHA ( 1 ) , HEX(2), 
R B0TH(3>? *'>; 
DECLARE MSG7 DATACTRACK *' >, MSG8 DATA <", SECTOR *' >, MSG9 DRTR CBVTE*'>, 

MSG10 DATA C*->,MSG11 DATA ('ENTER A (AGAIN>, D (DOS>, OR M (MONITOR) * 
'), MSG12 DRTR ( ' *THIS SECTOR DD MARKED**); 

/* DIALOGUE WITH USER */ 

GALL PRINTA(. MSG1, 1>; 
Pl>: CALL PRINTfl(. MSG2, 1>; 

IF ( UN I TK=LGW( READHEX >X0 OR UNIT >3 THEN GO TO PI; 
P2K CALL PRINTA(. MSG3, 1); 

IF(TRACKX=LOW(READHEX)><0 OR TRACK>4CH THEN GO TO P2; 
P3K CALL PRINTfl(. MSG4, 1!>; 

IF (SECTOR?i=LOW( READHEX) XI OR SECT0R>1AH THEN GO TO P3; 
P4X CALL PRINTA(. MSG5, 1>; 

IF(NSECTK=RERDHEXX1 OR NSECT>7D2H THEN GO TO P4; 
P5K CALL PRINTA(. MSG6, 1); 

I F(CODE?i=LQW( READHEX > XI OR C0DE>3 THEN GO TO P5; 

/* INITIALIZE FILE POINTER TABLE */ 

DECLRRE TRBLELOC ADDRESS, (TABLE BASED TABLELOC) (5> BYTE; 
TRBLEL0C=5H; /* ADDRESS OF INPUT FILE TABLE */ 
NSECT=NSECT+1; 
TABLE ( @ > =LOW ( NSECT ) ; 
T ABLE ( 1 > =H I GH ( NSECT > ; 
TRBLE(2)=TRACK; 

TRBLE(3>=(SECTOR-l> OR RQL(UNIT, 6); 
TRBLE(4>=0; 

/* MR IN DUMP LOOP */ 

EXPTRRCK=TRRCK; 
EXPSECT=SECTOR; 
NSECT=NSECT-1; 
DO 1=1 TO NSECT; 

/* READ 1 SECTOR (128 BYTES > INTO RRM. */ 

DO J=0 TO 127; 
BUF(J>=RDISC; 
END; 
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/* GET bECTOR AND TRACK JUST READ FROM FILE POINTER TABLE, AND CHECK 
THAT IT MATCHES THE EXPECTED TRACK AND SECTOR. IF NOT, ISSUE DD MESSAGE, INCRE- 
MENT EXPECTED SECTOR, AND CHECK AGAIN UNTIL EXPECTED AND ACTUAL MATCH. */ 

CALL PRINTAC MSG7, 1>; 

CALL PRINTNCEXPTRACK); 

CALL PRINTAC MSG8, 0>; 

CALL PR I NTN < EXPSECT > ; 

ACTSECT=TABLE<3>AND 1FH; 

ACTTRACK=TABLE <. 2 > ; 

DO WHILE ACTSECTOEXPSECT OR ACTTRACKOEXPTRACK; 

CALL PRINTAC MSG12, 0); 

EXPSECT=EXPSECT+1; 

IF EXPSECT=1BH THEN DO; 
EXPSECT=1; 

EXPTRACK=EXPTRACK+1; 
END; 

CALL PRINTAC. MSG7, 1>; 

CALL PRINTNCEXPTRACK); 

CALL PRINTAC MSG8, 0>; 

CALL PR I NTN i EXPSECT > ; 

END; 
EXPSECT=EXPSECT+1; 
IF EXPSECT=1BH THEN DO; 

EXPSECT=1; 

EXPTRACK=EXP T RACK+1; 

END; 
CALL PRINTAC MSG9, 1>; 

/+ PRINT THE SECTOR IN LINES OF 10H BYTES */ 

DO J=8 TO 70H BV 10H; 
CALL PRINTAC MSG1S, IX; 
CALL SPACE < I); 
CALL PRINTNCJ>; 
CALL SPACE Cl>; 

IF (CODE AND 01H:)=1 THEN DO; /* ALPHA DUMP */ 
PRINT=FALSE; 

DO K=0 TO 15; /* SCAN FOR PRINTABLE CHARACTERS */ 
CHAR=BUFCJ+K>; 

IF CHAR>20H AND CHAR<7EH THEN PRINT=TRUE; 
END; 
IF PRINT THEN DO K=0 TO 15; 
CALL SPACE <2>; 
CHAR=BUFCJ+K:.i AND 7FH; 

IF CHAR<20H OR CHAR>7EH THEN CHAR=' '; 
CALL CGCCCHARX; 
END; 
END; 
IF < CODE AND 02H>=2 THEN DO; /* HEX DUMP */ 
IF (CODE AND 01H>=1 THEN DO; 
CALL PRINTAC MSG10, 1>; 
CALL SPACE<4>; 
END; 
DO K=@ TO 15; 
CALL SPACE CI); 
CALL PR I NTN C BUF CJ+K > ) ; 
END; 
END; 
END; 
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END; 

Pfc.:-: CALL F'RINTFK. MSG11, 1); 
CALL COC < CHRRK=C I C > ; 
CHflR=CHRR RND 7FH; 
IF CHRR= 8 THEN GO TO PI J 
ELSE IF CHRR=M" THEN GO TO 280OHJ 
ELSE IF CHRR='D THEN GO TO SOOOH; 
ELSE GO TO P6; 

EOh 
COPV COMPLETE. 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Dec. 1976 
Ref. AB56 



□ 4004 □ 4040 D 8008 D 8080 □ 3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



LIST/ PRINT/TYPE "LIST, SRC" on Diskette. 

LIST a file on the line printer allowing space for tabs. 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Intellec MDS and appropriate output devi 



ce, 



ISIS diskette Operating Systems. 



Change output file name (symbol "LFILE") to 
TO: for TTY (PRINT PROG) 
CO: for CRT/TTY (LIST PROG) 
VO: for CRT (LIST PROG) 
LP: for Line Printer (LIST PROG) 



Output 
Results 



Tab characters will be acknowledged. 



Registers Modified: 



RAM Required: 

32K 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

ASM8 



Programmer: 

Brian L. Halla 



Company: 

Intel Corp, 



Address: 



3065 Bowers Ave. 

Santa Clara. Ca. 95051 



98-034C 
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MICROCOMPUTER USER'S Dec 1976 
LIBRARY SUBMITTAL FORM **• acis 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 □ 4040 □ 8008 £j 8080 



(use additional sheets if necessary) 



Interfacing the MDS and HP2644A 



Acts as an interface between MDS and HP2644A mini data station. Lets 
user use tape for both reading and writing data. 



MDS system, HP2644A mini data station optional floppy disc system. 



For writing data of tape: C Reg should contain ASCII character. 
For reading data from tape: A Reg contains tha ASCII character. 
For using the console as a list device: A Reg should contain ASCII 
character. 



When reading data from tape, the program returns the ASCII character 
in the 'A 1 registers. When it detects end of file, it returns two null 
characters. When writing data to tape, the program writes out the 
character in the 'C register to tape. 





Registers Modified: 


Assembler/Compiler Used: 




A, PSW 


ASM80 Assembler 




RAM Required: 


Programmer: 




240H Bytes 


A. Aggarwal 




ROM Required: 


Company: 







BNR, Inc. 




Maximum Subroutine Nesting Level: 


Address: 




2 


3174 Porter Dr., Palo Alto, 


CA. 






98-034B 






4-308 



iny 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Dec. 1976 
Ref. AC19 



D 4004 D 4040 D 8008 B 8080 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



Video Driver 



To drive a video system of 16 lines by 64 characters per line. 



IK video ram, locations OFC00H to 0FFFFH, as part of 8080 bus. 
Each memory location represents 1 character. Each successive block 
of 64 locations represents one line. 



None 



A register has 7 bit ASCII character. 

FF (form feed) character sets all of IK block to spaces (020H) 
and sets the character pointer to the start of the memory. 

LF (line feed) character adds 64 modulo 1024 to the character 
pointer and then blanks line. 

CR (carriage return) character sets memory locations from the 
character pointer to the end of the current line to blanks and 
sets the character pointer to the beginning of the current 
line. 



Registers Modified: 

None 


Assembler/Compiler Used: 
Intellec 8 Mod 80 Ver 3.0 


RAM Required: 

IK Video RAM at 0FC00H 

2 bytes for character pointer 


Programmer: 

S. Graf 


ROM Required: 

96 bytes 


Company: 

B.C. Telephone Company 


Maximum Subroutine Nesting Level: 
1 


Address: ?6g Seymour STR . fc wct) 
Vancouver, B.C., Canada „,.. ,„_ 
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REF. NO AC 1 9 

PROGRAM TITLE VIDEO DRIVER 



0000 00FC 



000C 
000A 
000D 
0020 



VIDCP: 



FF 
LF 
CR 
SPACE 



WRITE: 



000? 


F5 


0003 


E5 


0004 


2A0000 


0007 


FF0C 


0009 


CA1F00 


000C 


FF0D 


000E 


CA2F00 


0011 


FE0A 


0013 


CA3B00 


0016 


77 


0017 


23 



VIDRT: 



0038 220000 
001B El 
001C Fl 
001D C9 



RAM SPACE 

DW 0FC80H ; 2 BVTES REQUIRED 



EQUATES 

FQU 
EQU 
EQU 
EQU 



0CH 
0AH 
0DH 
020H 



PROGRAM SPACE 



ENTRV 


POINT 


PUSH 


PSW 


PUSH 


H 


LHLD 


VIDCP 


CPI 


FF 


J7 


VIDFF 


CPI 


CR 


J7 


VIDCR 


CPI 


LF 


JZ 


VIDLF 


MOV 


M, A 


I NX 


H 



; FORM FEED 
:LINE FEED 
; CARRIAGE RETURN 
, SPACE 



;SAVE 

> GET CHARACTER POINTER 
CHECK FOR FORM FEED 
JUMP IF FORM FEED 
CHECK FOR CARRIAGE RETURN 
JUMP IF CARRIAGE RETURN 
CHECK FOR LINE FEED 
JUMP IF LINE FEED 
PUT CHARACTER IN VIDEO MEMORY 
BUMP POINTER 



COMMON EXIT POINT 



SHLD 


VIDCP 


;SAVE CHARACTER POINTER 


POP 


H 


; RESTORE 


POP 


PSW 


; RESTORE 


RET 




;EXIT 
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FORM FEED SERVICE 



001E 2100FC 

0021 220000 

0024 2620 

0026 23 

0027 AF 

0028 BC 

0029 C22400 
002C El 
002D Fl 
002E C9 



VIDFF: 
VIDFC: 



LXI 

SHLD 

MVI 
I NX 
XRA 
CMP 
JNZ 
POP 
POP 
RET 



H, 0FC00H;SET STARTOF VIDEO MEMORV 

VIDCP , SET NEW START POSITION 

M . sprce j PUT SPACE IN VIDEO MEMORV 

H 

A 

H 

VIDFC 

H 

PSW 



; BUMP POINTER 

; SET A TO 

; CHECK IF H IS 

; JUMP IF NOT 

i DONE - RESTORE 

.; RESTORE 

;EXIT 



002F E5 
0030 CD5800 

0033 El 

0034 7D 

0035 E6C0 

0037 6F 

0038 C31800 



VIDCP 



CARRIAGE RETURN SERVICE 



PUSH 


H 


CALL 


VBLNK 


POP 


H 


MOV 


A. L 


AN I 


0C0H 


MOV 


1... A 


.IMP 


VI DPT 



SAVE PRESENT CARRACTER POSITION 

BLANK FILL LINE 

RETfiRE CHARACTER POSITION 

GET LOW BYTE CHARACTER POINTER 

SET BACK TO START OF LINE 

PUT BACK 

USE COMMON EXIT 



LINE FEED SERVICE 



VIDLF: 



003B 7D 
003C C640 
003E 6F 
003F 7C 
0040 CE00 

0042 67 

0043 FA4C00 
0046 26FC 

0048 7D 

0049 E6C0 
004B 6F 

004C E5 
004D 7D 
004E E6C0 

0050 6F 

0051 CD5800 
0054 El 



VLFBL 



MOV 


A, L 


AD I 


040H 


MOV 


L, A 


MOV 


A, H 


AC I 





MOV 


H. A 


JM 


VLFBL 


MVI 


H, 0FCH 


MOV 


A.L 


AN I 


0C0H 


MOV 


L. A 


PUSH 


H 


MOV 


A. L 


AN I 


0C0H 


MOV 


L, A 


CALL 


VBLNK 


POP 


H 



; GET LOW BYTE CHARACTER POSITION 

; INCREMENT LINE COUNT 

.; PUT BACK 

i GET HIGH BYTE 

.; INCREMENT IF NECESSARY 

.i PUT BACK 

i BLANK LINE IF NO WRAP AROUND 

i SET TO START IF OVER END 

; GET LOW ORDER LINE BITS 

.; CLEAR THEM 

i PUT BACK 

. sflvF CHARACTER POSITION 
; GET POSITION IN LINE 
; SET TO START 

; BLANK LINE 

:. RESTORE CHARACTER POSITION 
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0055 C31800 



IMP 



VIDRT ;USE COMMON EXIT 



BLANK TO END OF LINE 



VBLNK : 



0058 3620 
005A 2C 
005B 7D 
005C E63F 
005E C25800 
006.1 C9 



MVJ 


M, SPACE ; 


TNR 


L ; 


MOV 


A.. L .; 


AN I 


03FH ; 


JN? 


VBLNK i 


RET 


> 



;PUT IN SPACE 

•> BUMP COUNTER 

: GET POSITION IN LINE 

-ONLV 

-JUMP IF NOT AT END OF LINE 

;DONE 



0000 



END 
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LIBRARY SUBMITTAL FORM Ref AC2 ° 



D 4004 D 4040 Q 8008 09 8060 



(use additional sheets if necessary) 



Program 
Title 

Function 



BASIC DIGITAL PANEL METER CALL 



Reads BCD data from a 4 digit plus sign panel meter and sets a BASIC 
variable X equal to the data. Meter initiation is done in hardware. 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



808(8 system with panel meter I/O interface. 



Output 

Results 



8080 BASIC, floating point package, and octal debugging program. 

BASIC call statement protocol: 

CALL (l.X) 
X Should Be Previously Defined. 



The variable X equals the meter reading integer val 



ue. 



i/U port numbers: 6 reads MS 8 bits, 1 reads LS 8 bits, \ reads si 
bit: D 7 . 



gn 



Registers Modified: 

A, B, C, D, E, H, L 

RAM Required: 



ROM Required: 

103-jq locations 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

8080 macro assem. ver. 2.2 



Programmer: 

C. L. Pomernacki 



Company: 
LLL 



Address: 

Livermore, California 94550 



98-034B 
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REF. NO. AC20 

PROGRAM TITLE BASIC DIGITAL PANEL METER CALL 



CALL ROUTINES 



0000 30AA 


FWAM: 


DM 0AA30H 




J ENTRIES TO SUBTABL 


0002 01 


SUBS: 


DB 1 


0003 0600 




DW BCDBIN 


0005 FF 




DB 377Q 




i SUB #1 


0006 DB06 


BCDBIN: 


IN 6 


0008 67 




MOV H, A 


0009 DB07 




IN 7 


000B 6F 




MOV L, A 


000C 1E00 




MVI E, 


000E ?D 




MOV A, L 


000F CD2500 




CALL MSKMS 


0012 D5 




PUSH D 


0013 70 




MOV A, L 


0014 CD290O 




CALL MSKLS 


0017 D5 




PUSH D 


0018 ?C 




MOV A, H 


0019 CD2500 




CALL MSKMS 


001C D5 




PUSH D 


001D ?C 




MOV A, H 


001E CD2900 




CALL MSKLS 


0021 D5 




PUSH D 


0022 C33100 




JMP BBIN 


0025 E60F 


MSKMS : 


AN I 1?Q 


002? 57 




MOV D, A 


0028 C9 




RET 


0029 E6F0 


MSKLS : 


AN I 360Q 


002B 0F 




RRC 


002C 0F 




RRC 


002D 0F 




RRC 


002E 0F 




RRC 


002F 57 




MOV D, A 


0030 C9 




RET 



DEFINE FWAM POINTER 



;END OF TABLE 



MS8 TO A 
A TO H 
LS8 TO A 
A TO L 
CLEAR E REO. 
L TO A 

D, E TO STACK 
L TO A AGAIN 

D, E TO STACK 
H TO A 

D, E TO STACK 
iHTOfl AGAIN 

■> D, E TO STACK 



JMASKOUT MS4 
;A TO D 



MASKOUT LS4 
SHIFT 



4 RIGHT 
A TO D 
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0031 0E04 
0033 210000 
0036 AF 



BBIN: 



MVI C, 4 
LXI H, 
XRA A 



0037 


E5 


0038 


4? 


0039 


29 


003A 


8F 


003B 


29 


003C 


8F 


003D 


Dl 


003E 


19 


003F 


88 


0040 


29 


0041 


8F 


0042 


4? 


0043 


Dl 


0044 


7fl 


0045 


85 


0046 


6F 


004? 


7C 


0048 


CE00 


004A 


6? 


0O4B 


78 


004C 


CE00 


004E 


0D 


004F 


C23700 



;MULT EACH DIGIT BV 10 



LOOP: 



; 4 IS # OF BCD DIGITS 
; INITIALIZE H, L 
;AND A TO ZERO 



;SAVE LS 16 BITS ON STK. 
; SAVE fl IN B REG. 
;MULT 



;BV 4 

; RESTORE 16 BITS TO D, E 

;ADD 1 

; TO MAKE 5 

jMULT BV 2 

) TO MAKE 10 

; SAVE A IN B 

;GET NEXT DIGIT 

; INTO A REG. 

i ADD IN NEW DIGIT 



; ADD IN CARV 



; ADD IN CflRRV 

i BUMP DOWN COUNTER 

i DONE* 



;NOTEj A, H, L CONTAIN FIXED PT. # 

; DIGITS ARE RIGHT JUSTIFIED Mb IN TOP OF bTACK 



PUSH H 




MOV B, 


fl 


DAD H 




ADC fl 




DAD H 




ADC A 




POP D 




DflD D 




ADC B 




DAD H 




ADC A 




MOV B, 


fl 


POP D 




MOV fl, 


D 


ADD L 




MOV L, 


A 


MOV fl, 


H 


flCI 




MOV H, 


fl 


MOV fl. 


B 


flCI 




DCR C 




JNZ LC 


30 



0052 


11307C 


0055 


EB 


0056 


77 


0057 


23 


0058 


72 


0059 


23 


005A 


73 


005B 


23 


005C 


DB01 


005E 


77 


005F 


28 


0060 


2B 


0061 


2B 


0062 


CD0FCA 


0065 


Dl 


0066 


EB 



LXI D, 7C30H 

XCHG 

MOV M, A 

INX H 

MOV M, D 

INX H 

MOV M, E 

INX H 

IN 1 

MOV M, fl 

DCX H 

DCX H 

DCX H 

CALL 0CA9FH 

POP D 

XCHG 



; GET REG. ADD. 

i D, E NAS # H, L HAS ADD. 

;MS TO FREG1 

; S TO FREG1+1 

; LS TO FREG1+2 

;SIGN TO A 

; SIGN TO FREG1+3 



; RESET POINTER 

; FLOAT # 
;GET VAR. ADD. 
;H, L HAS VAR. ADD. 



D, E HAS FREG1 
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006? CD17B6 CALL 0B617H ; SET VAR. =FREQ1 

006A -C9 RET ; DONE 

8000 END 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Dec. 1976 
Ref. AC21 



□ 4004 D 4040 8008x88080 



Inn additional shaats if necesiary) 



Program 
Title 

Function 



Required 



Required 
Software 



input 
Parameter* 



Output 
Results 



APL Graphic Display on a 5 x 7 Dot Matrix 

The program decodes a standard APL keyboard and outputs the pressed 
key to a 5 x 7 dot matrix display. 



None 



Input port 80 is 7-bit code from an APL keyboard 



Output po rts through 4 drive the five columns on a MAN 2A dot matrix 
display. 1/0 W latches the output data, which is input into the seven 
rows of the MAN 2A dot matrix display. 



Program offered 
on diskette only. 



Registers Modified: 

A, B, C, H, and L 


Assembler/Compiler Used: 

8080 Assembler, Ver. 2.4 


RAM Required: 

1 byte 


Programmer: 

Helene Young Myers 


ROM Required: 

610 bytes 


Company: 


Maximum Subroutine Nesting Lev*): 


Address: 4313 Judith Street 

Rockville, Maryland 20853 



8/78 



98-0348 
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jp+ [ LIBRARY SUBMITTAL FORM Ref AC22 



D 4004 □ 8008 rf 8080 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



SBLPT 

Buffered line printer driver for the Centronix 101A Line 
Printer, utilizing the Intellec 8-Mod 80 



Intellec 8 Mod 80 
Centronix 101A Line Printer 



Intellec 8 Mod 80 Exec 



AL = 1 



(CHAR IN C) 
CALL LO 



The assembled line is printed on the line printer when 
carriage return character is received. 



Registers Modified: 

none 



RAM Required: 

CALL L0) 



86 bytes (including 



ROM Required: 

2 56 bytes 



Maximum Subroutine Nesting Level: 
1 



Assembler/Compiler Used: 
Intellec 8 Macro Assembler 



Programmer: George Wood ley 



Company: Wood ley Associates 

604 Indian Home Road 
Danvxlle. CA 94S26 
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Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



MICROCOMPUTER USER'S Dec 1976 
LIBRARY SUBMITTAL FORM Ref 



AEl 



□ 4004 □ 4040 □ 8008 29 8080 



(use additional sheets if necessary) 



LIST 



THIS ROUTINE IS TO BE USED AS AN MDSCALL IN CONJUNCTION WITH THE ICE80 
SOFTWARE DRIVER. WHEN CALLED, IT WILL RETRIEVE THE PC FROM THE ICE80 
CONTROL BLOCK, MATCH IT WITH AN ADDRESS IN THE USER'S LIST FILE GENERAT- 
ED BY ASM80, AND PRINT THE CORRESPONDING SOURCE CODE ON THE CONSOLE. 
IN THE STEP MODE, THE ENTIRE PROGRAM MAY BE LISTED. 



MDS-800 
ICE-80 



MDS-DOS 
CONSOLE 



ISIS MDS MONITOR VI. 2 

ICE-80 ASM80 



THE PROGRAM WILL ASK FOR THE USER'S LIST FILE FILENAME ON THE FIRST 
SUBROUTINE CALL. 



A LINE OF SOURCE CODE, STARTING WITH THE LABEL FIELD AND EXTENDING THROUGH 
THE COMMENT FIELD, IS LISTED ON THE CONSOLE. ISIS ERRORS CAUSE AN ERROR 
MESSAGE TO BE DISPLAYED AND HALT THE PROCESSOR. A LARGE BLOCK OF COM- 
MENTS OR PSEUDO-OPS IN THE MIDDLE OF THE LIST FILE MAY CAUSE THE ROUT- 
INE TO HANG UP IN A LOOP. 



Registers Modified: 



ALL 



RAM Required: 



435 BYTES 



ROM Required: 



Assembler/Compiler Used: 

ISIS 8080 VI. 1 



Programmer: 

BERNARD J. VERREAU 



Maximum Subroutine Nesting Level: 

3 



Company: 

NATIONAL CASH REGISTER 



Address: 

P.O. BOX 607, MILLSBORO DEL. 19963 



98034B 
4-319 



irrte 1 



MICROCOMPUTER USER'S **■ im 
LIBRARY SUBMITTAL FORM ** . «2 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 □ 4040 D 8008 D 8080 



(use additional sheets if necessary) 



Trace Routine 

This routine is a debugging aid, which when appended to a program allows 
the user to run the program normally, or to single step the program. In 
single step mode, he can display breakpoint, jump to the monitor, ISIS, 
or proceed, by typing in a character from the system console. The list 
of commands is easily expanded. 



MDS 



MDS System Monitor V 2 . 
MAC 80 for assembly 



"DEBUG" is one byte which is set to one if the user wishes to run his 
program in trace mode; otherwise set to zero. 

"SINGLESTEP" is one byte which, when not on will merely print user's 
message on the console device. If set to one, the program will single 
step and wait for the user to type a character on the console device, 
execute the corresponding command before proceeding. 

The user must also supply the text message desired. 

The program will print out the desired text, singlestep if desired, and 
respond to user commands by displaying the breakpoint, or jumping to the 
system monitor, or jumping to ISIS, or simply proceeding. The possible 
commands can be expanded. r 



Registers Modified: 

None - all registers restored 



RAM Required: 

115 bytes 



ROM Required: 

None 



Maximum Subroutine Nesting Level: 

Three (counting monitor calls) 



Assembler/Compiler Used: 

MAC 80 



Programmer: 

Ed Klingman 



Company: 

Cybernetic Micro Systems 



Address: 246 q Emba rcadero Way 
Palo Alto, CA. 94303 



980346 
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MICROCOMPUTER USER'S &*=■ "'6 
LIBRARY SUBMITTAL FORM tef «3 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 



Output 
Results 



D 4004 D 4040 D 8008 £f 8080 



L 



(use additional sheets if necessary) 



8080 Symbol Table Dump 



This program prints the name and location of all symbols (including 
macro's), after the first or second pass of the assembler. The 
program can be assembled in PROM if desired. 



Ihtellec 8/M0D 80 and ASR 33 TTY 



Monitor V 3.0 

Macro Assembler V 4.1 



None 



Test tape included to verify macro capability, 
on the (8008) "Symbol Table List Routine" (Ref . 



This program is based 
AB30) by Robert Uleski. 



Registers Modified: 

All 



RAM Required: 

161 bytes 



ROM Required: 

N/A 



Maximum Subroutine Nesting Level: 

N/A 



Assembler/Compiler Used: 

Macro Assembler V 4.1 



Programmer: 

Earl G. Day 



Company: 

DIT-MC0 International Corp. 



Address: 5612 Brighton Terr 

Kansas City, M0. 64130 



98-034B 
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i REF NO. AE3 

.; PROGRAM TITLE 8089 SYMBOL TABLE DUMP 



2AO0 




ORG 


2A90H 


3CCD 


CRLF 


EQU 


3CCDH 


3C5D 


TTV 


EQU 


3C5DH 


1C8E 


SYMBL 


EQU 


1C8EH 


386B 


START 


EQU 


386BH 


3CC5 


CONV 


EQU 


3CC5H 


2AO0 CDCD3C 




CALL 


CRLF 


2A83 0616 




MVI 


B, 22 


2A05 CD832A 




CALL 


BLKO 




i IN 


REGISTER B 


2A08 21732A 




LXI 


H, MSG 


2A0B 060E 




MVI 


B, 14 


2A0D 4E 


SVM0 : 


MOV 


C, M 


2A0E 23 




I NX 


H 


2A0F CD5D3C 




CALL 


TTV 


A12 05 




DCR 


B 


2A13 C20D2A 




JNZ 


SYMO 


2A16 118E1C 




LXI 


D, SYMBL 




i SYMBOL TABLE 


2A19 CD2B2A 


LOOP : 


CALL 


L00P6 


2A1C CD2B2A 




CALL 


LOOP0 


2A1F CD2B2A 




CALL 


LOOP0 


2A22 CD2B2A 




CALL 


LOOP© 


2A25 CDCD3C 




CALL 


CRLF 


2A28 C3132A 




IMP 


LOOP 


2A2B 62 


LOOP© : 


MOV 


H, D 


2A2C 6B 




MOV 


L, E 


2A2D 7E 




MOV 


A, M 


2A2E Q6&3 




MVI 


B, 8 


2A30 CD8D2A 




CALL 


ALFA1 


2A33 6B 




MOV 


L, E 


2A34 0605 




MVI 


B, 5 


2A36 4E 


LOOP1 : 


MOV 


C, M 


2A3? 23 




I NX 


H 


2A38 CD5D3C 




CALL 


TTY 


2A3B 05 




DCR 


B 


2A3C C2362A 




■JNZ 


LOOP1 


2A3F 0E2O 




MVI 


C, 20H 


2A41 23 




I NX 


H 


2A42 CD5D3C 




CALL 


TTY 


"i45 0E20 




MVI 


C, 20H 


*:A47 CD5D3C 




CALL 


TTY 


2A4A 23 




I NX 


H 


2A4B CD532A 




CALL 


BYTE 



t PRINT THE NUMBER OF BLANK: 
i PRINT "SYMBOL TABLE" 



i POINT TO BEGINNING OF 

J PRINT FOUR SYMBOLS PER LINE 



i PRINT A SYMBOL AND ADDRESS SR 



i bET TRIES COUNTER. 
;FIND ALPHA CHAR. 



; LOAD .ft PRINT LABEL 



; PRINT TWO SPACES 



J PRINT MSB OF ADDRESS 
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2R4E 2E 
2FI4F CD592A 
2R52 CD6C2R 
2R55 CD812R 
2R58 C9 
2A59 7E 



BVTE 



TWO 



2R5R 
2A5B 
2A5C 
2R5D 
2R5E 
2R60 
2R63 
2R64 
2R66 
2R69 
2R6C 
2R6D 
2A6F 
2A70 
ri?± 
2R72 
2A73 
2R77 
2R7B 
2R7F 
2A81 
2A83 



0F 

0F 

0F 

0F 

E60F 

CD662A 

7E 

E60F 

CDC53C 

C35D3C 

7B 

C608 

5F 

D0 

14 

C9 

53594D42 

4F4C2054 

41424C45 

8D0R 

0686 

0E20 



HXD: 
NEX : 



2A85 CD5D3C 
2R88 05 
2R89 C8 
2R8R C3832A 
2A8D 7E 
2R8E FE5R 
2R90 D2992R 
2A93 FE41 
2A95 DR992R 
2R98 C9 
2R99 23 
2R9R 13 
2R9B 05 
2R9C C28D2R 
2A9F C36B38 

0000 



MSG 



BLRNK : 
BLKO : 

; TM 



RLFR1 



NORLFR 



DCX 

CRLL 

CfiLL 

CRLL 

RET 

MOV 

flSC 1 1 

RRC 

RRC 

RRC 

RRC 

AN I 

CRLL 

MOV 

RNI 

CALL 

JMP 

MOV 

RDI 

MOV 

RNC 

INR 

RET 

DB 



MVI 
MVI 

REG B. 
CRLL 
DCR 
RZ 
JMP 
MOV 
CPI 
JNC 
CPI 
JC 
RET 

; I NX 
I NX 
DCR 
JNZ 
JMP 
END 



H 

BVTE ^ PRINT LSB OF RDDREbb 

NEX 

BLRNK • PRINT 6 bPACES 

R., M ; PRINT R BVTE RS 
CHARACTERS 



0FH 

HXD 

A.. M 

0FH 

CONV 

TTV 

A, E 



i CALLS MONITOR CONVERT SB-RT. 
.i SET D4E TO NEXT SVMBOL 



E, R 

D 

•SVMBOL TRBLE • , ODH, ORH 



B, 6 

C, 20H 

TTV 
B 

BLKO 

R, M 

5RH 

NORLFR 

41H 

NORLFR 

H 

D 

B 

RLFR1 

STRRT 



PRINT 6 BLRNKb 

PRINT THE NUMBER OF BLRNK; 



COMPARE TO "Z" 
JMP IF ACO-Z" 
COMPARE TO "A" 
JMP IF RCCCR" 
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JnSJt^ " INTEL ' USERS LIBRARY SUBMITTAL FORM 

□ 4004 D4040 D8008 H8080 D3000 □ Other 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



STATEMENT-COUNTER 

All Assembler statements in a 8080 source file are counted. 



Intellec MDS 800 



MDS Monitor 



The source file to be counted, 



Output message on the TTY. 



Registers Modified: 
All 



RAM Required: 
6U0 bytes 



ROM Required: 



Maximum Subroutine Nesting Level: 
1 



Assembler/Compiler Used: 
8080 MDS MACRO ASS. Vers. 1.0 



© Intel Corporation, 1976 



Programmer: 

J. Thommen 



Company: 

MOSTEC, LIESTAL/SWITZERLAND 



Address: 

Fraumattstr. 11 



City: 

CH-41+10 Liestal 



State: 

Switzerland 
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Ref. # AB58 



inSlte iHJEV USER'S LIBRARY SUBMITTAL FORM 

D4004 D4040 D8008 08080 D 3000 D Other 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary I 



9600 



Re-initialize CRT UART for 9600 Baud 



Intellec MDS development syste 



m 



None 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
ISIS 8080 MACRO VI. 1 



1) lnt«l Corporation. 1976 



Programmer: 
Evan Schaffer 



Company: 

Interface Consultants 



Address: 
P. 0. Box 9 52 



City: 
Santa Cruz 



State: 
California 95060 
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0001 
0000 



REF. NO. AB58 

PROGRAM TITLE 9600 RE-INITIALIZE CRT UART FOR 9600 BAUD 



RE-INITIALIZE CRT TO 9600 BAUD 



MDS 
INTELLEC 



SET 
SET 



NOT MDS AND 1 



3100 



ORG 



3100H 



START : 



3100 


SE4ki 




MVI 


A, 40H 




3102 


D3F7 




OUT 


CRTC 


i SEND RESET COMMAND 


3104 


3E4E 




MVI 


A, 04EH 




3106 


D3F? 




OUT 


CRTC 


; SEND 96Q& BAUD COM 


3108 


3E27 




MVI 


A, 27H 




310A 


D3F.7 




OUT 


CRTC 


; ENABLE UART 






IF 


INTELLEC 










JMP 


* 








END IF 












IF 


MDS 






310C 


0E09 




MVI 


C, EXIT 




310E 


111431 




LXI 


D, EBLK 




3111 


CD4000 


EBLK : 


CALL 


ISIS 




3114 


1631 


ESTAT : 


DM 


ESTAT 




3116 




END IF 

* 


DS 


2 




00F? 




i 
CRTC 


EQU 


0F7H 




00F5 




TTC 


EQU 


0F5H 




0009 




EXIT 


EQU 


9 




0040 




ISIS 


EQU 


64 




3100 






END 


START 
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JnSlte INTEL ' USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 B8080 D3000 □ Other. 



(use additional sheets if necessary) 



SNAP DUMP 80 80 

To provide register and memory dumps for software debug. 



MDS-800 System 



MDS Monitor subroutine for list output. 



1) Calling Address 

2) Options Flags 

3) Start Memory Dump Address 

4) End Memory Dump Address 



Printed Snap Message with Requested Data Displayed. 



Registers Modified: 
NONE, all are saved/restored 


Programmer: 
S. G. Thompson 


RAM Required: 

17 bvtes 


Company: 

Harris Controls 


ROM Required: 
554 bytes 


Address: 

P. 0. Box 430 


Maximum Subroutine Nesting Level: 
3 


City: 
Melbourne 


Assembler/Compiler Used: 
Microtek Version 3.1 


State: 
Florida 32901 



Intal Corporation. 1976 



4-330 



98 034C 



USERS MANUAL FOR 
SNAP DUMP 8080 

by: Steven Thompson 



Calling Sequence : 



Calling Parameters; 
Flags /ID Byte: 



CALL SNAP 
DB FLAGS+ID 
DW START 
DW END 



*10NNNNNN* 
*01NNNNNN* 
*11NNNNNN* 
*00NNNNNN* 



No Memory Dumped 

No Register Dumped 

No Register or Memory Dumped 

Both Register and Memory Dumped 



N = ID# used to identify dump 

NOTE: The flag option bits may be specified in any combination 

Start Adr./End Adr. Define the start and end of the memory 
area to be dumped. 

Character Output Subroutine Assignment 

The program presently uses the MDS monitors character output 
subroutine with the' reverse break (control "b"). This allows assign- 
ment of the output and interruption of the printing by the operator. 
The equate to LO may be used to change the assignment. 



4-332 



SAMPLE OUTPUT 

SNAP AT: AAAA ID=BB vv „ v 

REGISTERS- A=QQ B=RR C=SS D=TT E=UU H=VV L=WW CC=XX=SZ0A0P1 C SP=YYYY 
CCCC DD DD DD DD DD DD DD DD DD DD DD DD DD DD DD DD *EEEEEEEEEEEEEEEE* 

WHERE: 

AAAA = Address of Snap In Hex 

BB = Snap Identification Number in Decimal 

QQ = A Register Contents In Hex 

RR = B Register Contents In Hex 

SS = C Register Contents In Hex 

TT = D Register Contents In Hex 

UU = E Register Contents In Hex 

VV = H Register Contents In Hex 

WW = L Register Contents In Hex 

XX = Condition Code Register Contents In Hex 

YYYY = Stack Pointer Register Contents In Hex 

CCCC = Hex Address of 16 Words of Storage Dumped 

DD = Hex Memory Data 

E = ASCII Interpretation of Memory Data if (A-Z. 0-9, blank) else a Period. 



i 

CO 
CO 



Ref. # AB59 



insite " INTEL * USER'S library submittal form 



Program 
Titlfe 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D 4040 D8008 D8080 D3000 □ Other. 



(use additional sheets if necessary) 



RTM (real time monitor). 



RTM is a small real time operating system which is 
meant to supervise periodic execution of RT-programs 
in a fixed priority manner. 

It has also a few standard output routines which must 
be used. 

The monitor itself require the INTELLEC 80 80 SYSTEM 
In addition comes a real time clock. 



MCS-80 system monitor CO (console output) is used, 
but can of course easely be replaced. 



Each RT-program must have a description table located 
from 155H. 



Depends on user programs . 

Note: To start up RTM supply RST4 via console, start 
in address F6 and turn on the real time clock. 



Registers Modified: 
All Register Saved 



RAM Required: 
155 HEX CELL 



ROM Required: 



Maximum Subroutine Nesting Level: 

5 until start of user program 
Assembler/Compiler Used: 

8080 MACRO ASSEMBLER, VER.3.0 



Programmer: 
Odd Stormo 



Company: 
0STFOLD TEKNISKE SKOLE 



Address: 

1712 Valaskiold 



City: 



State: 
NORWAY 



© Intel Corporation, 1976 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref. # AB60 



D 4004 D 4040 □ 8008 K) 8080 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



FORMAT INTEL DATA 

Procedure FMINDA is part of a bootloader which loads object code from 
from a cassette tape into the Intel lee MDS memory. The object code 
from e.ther the MAC80 Assembler or PL/M Compiler (or both), is written 

?0 woS S n H +aPe + " Sin9 9 T * L SMen+ 700 « ^cedure FMINDA takeHach 
90 word record conta.ning the object code in ASCII bytes, reformats the 
data and stores the object code in the designated location in RAM 



Output 
Results 



Registers Modified: 

ALL 



RAM Required: 

380 BYTES 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

PL/M COMPIIFR 



Programmer: 

VICTOR H. SAUCED0 



Company: 

Honeywel l Information Sy s tom c 



Address: 



P.O. Box 6000 

Phoenix, Arizona 85005 



4-336 9W)34B 



Ref. #AB6I 



insite INTEL ' users library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D4004 D4040 D8008 D8080 D3000 D Other. 



(use additional sheets if necessary) 



LIST VER 3.0 

To display/print ISIS files or MDS Monitor listings on the console 
in pages with optional line-numbers, optional assembly listing error 
only dis P l a y, and for ISIS files, optional listing between given 
line-numbers only. LIST includes all tabs. 

UPDATED VERSION 2/28/77 



MDS, Console 



MDS Monitor 
ISIS (Optional) 

Monitor users set D = for no line numbers,, else numbers. 

E = for normal listing, else error only, 
then go to start address. 

ISIS users give a U.SL as a console command. See the listing for 
details of syntax and options, e.g. 

- LIST FILE NE 1*3, 227 lists only lines in error between 

1^3 and 227 inclusive, with each 
such line numbered. 

MDS Monitor - Sets up the list assignment. All subsequent list output 
goes through LIST. 

ISIS - Displays the required file. 

After each page key no. of lines wanted (0 - 9) or escape to ISIS. 











Registers Modified: 


Programmer: 




RAM Required: 


Company : 


ROM Required: 


Address: 


Maximum Subroutine Nesting Level: 


City: 


Assembler/Compiler Used: 


State: 


© lnt«l Corporation, 1976 
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Ref . # AA12 



JnSJte INTEL ' "SER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 B8080 D3000 □ Other. 



(use additional sheets if necessary) 



8 080 CPU Exerciser Routine 



Designed as an on-line, periodic, exercising program. 
Executes almost all instruction in the 8080 to ensure proper 
functioning. A set of instructions is executed to which 
a predefined result is expected. If result does not match, 
program halts. See attached sheets. 

N/A 



None 



None 



N/A 



Registers Modified: 

All including SP 



RAM Required: 
3 Bytes 



ROM Required: 
376 Bytes 



Maximum Subroutine Nesting Level: 
2 



Assembler/Compiler Used: 

I SIS 8080. Mj rv^ A ggom V,1 r> 



Programmer: 

W. Iwamoto/R. Lonchar 



Company: 

North Electric Company 



Address: 

P. 0. Box 20345 



City: 

Columbus 



State: 

Ohio 



43??n 



e Intel Corporation. 1976 
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Ref. § AA12 



insHe " INTEL ' USERS library submittal form 



Requirements and Notes 



A. 



B. 



The 3 Bytes at Locations fOFCH-40FEH are to be RAM 
locations. 

Program is address dependent, occuring from location 
4102H. The CPI instruction 4107H will have to be 
changed if RAM addresses do not correspond to the ones 
in this assembly. Adjustment may also have to be made 
to the ORI instruction at location 4133H. Accumulator 
should contain 0C3H after the operation. 

C. Numbers at locations 401FH-4024H are random and may be 
changed. This is also true for the LVI instruction at 
location H092H. This instruction requires a RAM address J 

D. Instruction at location U179H should be changed to a 
JMP or an RET instruction. 

No results are generated and no input parameters are needed. 
Program either passes or halts. 
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Ref. # AB62 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 08080 D3000 □ Other. 



(use additional sheets if necessary) 



BTP (Binary Tape Programme) 

To read, check or punch binary paper tape directly to and 
fromMDS memory using a rubout character as the tape index, 
Specified blocks or memory can be inverted (complemented). 
All periferials are assigned by the resident monitor. 

MDS 800 

Console Device 
Listing Device 
Paper Tape Reader 
Paper Tape Punch 

MDS Monitor 



Initial command R,V,P,I,M or D then MDS memory addresses 
specified in hexidecimal followed by carriage return. 

M and D do not require addresses or CR. 

The correct format for the other commands is shown in the 

listing. 



Tape will be punched when using P command with blank leader 

and trailer. 

Data is immediately preceded by a rubout character and the 

data from memory is addressed along sequential locations on 

the tape. 

All commands except P, make software changes only. 

An error signal will result if: 

1. The memory doesn't write correctly. 

2. The memory addresses are not specified correctly. 

3. The tape doesn't agree with memory when verifying. 



Registers Modified: 
All 



RAM Required: . 5K for 

U8H (37B0 to 37FF) Programme 

ROM Required: 

0.5K when ROM resident 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
ISIS MACRO 8080 



VI. 



Programmer: 

Jim Arkell 



Company: 

RAPID RECALL LIMITED 



Address: 

9 Betterton Street 



City: 

London 



State: 

WC2H 9BS, England 



© Intel Corporation, 1976 
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intel 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref . # AB63 



□ 4004 □ 4040 D 8008 □ 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



8080 



(use additional sheets if necessary) 



LERR (List Assembly Errors) 

Searches diskette list file 

and prints all such statements'on^onsoie'device! 



SS'S?:.; 1 :??*^! 1 !*.!^ for assem *>ly error statements 



MDS-80, (32K RAM), TTY, Diskette System 



ISIS VI. 0, MDS Monitor CO routine 



ISIS 8080 Macro Assembler Program 
list file name, such as "FILE.LST". 



Listing on console device of all 
program statements. 



error containing 



Registers Modified: 
All 



RAM Required: 

See Listing 



ROM Required: 

See Listing 



Maximum Subroutine Nesting Level: 

See Listing 



Assembler/Compiler Used: 

ISIS 8080 Macro Assembler 



Programmer: 
M. Polad 



Company: 

Data Card Corporation 



Address: -, c ^r -^ , , 

7625 Parklawn Ave 

Minneapolis, MN. 55435 



4-346 98034B 



I_*S 8089 MACRO 
PROGRAM LERR 



ASSEMBLER, 



VI. 

9/16.- 



PAGE 1 



i REF. NO. AB63 

.; PROGRAM TITLE LERR 



TITLE 'PROGRAM LERR 

i COMMAND: <LERR FILENAME> 



9/16/76' 



4000 

0000 
0003 
000C 
0040 
0009 
000D 

30A 
F809 

4000 

4003 
4005 
4008 
400B 
400D 

4010 

4013 
4016 
4019 
401A 
401C 
401F 
4022 
4023 
4025 
4028 
402A 
402D 
402E 
4031 
4034 
?35 
-t03? 
403A 
403D 



314A41 
0E03 
119B40 
CD7240 

0E00 

11A540 

CD7240 

CD5B40 

CD5440 

79 

FEOA 

C21640 

CD5440 

79 

FEOD 

CA1640 

FE20 

CA1640 

79 

32BD40 

CD5440 

79 

FE28 

C21640 

3ABD40 

4F 



OPEN 

READ 

ERROR 

ISIS 

EXIT 

CR 

LF 

CO 

BEGIN; 



LOOP : 



L00P1 : 



CPHD : 



.= PROGRAM SEARCHES THROUGH LIST FILE (.OUTPUT FROM ASM80> 
i PRINTS ALL STATEMENTS CONTAINING ASSEMBLY ERRORS ON THE 
J DEVICE. 



ORG 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

LXI 

MVI 

LXI 

CALL 

MVI 

LXI 

CALL 

CALL 

CALL 

MOV 

CPI 

JNZ 

CALL 

MOV 

CPI 

JZ 

CPI 

JZ 

MOV 

STA 

CALL 

MOV 

CPI 

JNZ 

LDA 

MOV 



40O0H 



3 

12 

64 

0DH 
0AH 
0F809H 

SP, STACK+10 

C, READ 

D, RBLK 
SVS 

C, OPEN 

D, OBLK 



RD 

GNC 

A, C 

LF 

LOOP 

GNC 

ft, C 

ODH 

LOOP 

LOOP 
A, C 
TEMP 
GNC 
A, C 

s s 

LOOP 
TEMP 
C, A 



OPEN LIST FILE ; READ FILENAME FROM :CI: 
READ BLOCK FROM LIST FILE TO BUF 
GET A CHAR FROM BUF 



^LOOP UNTIL CHAR= LF 

i GET NEXT CHAR C FIRST ON LINE> 



.; IF CHAR= CR OR SPACE, LOOK FOR NEXT LF 

; SAVE FIRST CHAR ON LINE 
; GET 2ND CHAR ON LINE 



J IF 2ND CHAR NOT SPACE, IGNORE <PAGE HDG 
J GET FIRST CHAR 
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I _ . S 8980 MACRO ASSEMBLER: 
PROGRAM LERR 



VI. 



'16/76 



PAGE 2 



403E 


CD09F8 


4041 


4E 


4042 


CD09F8 


4045 


CD5440 


4048 


79 


4049 


FE0A 


404B 


C24240 


404E 


CD09F8 


4051 


C31F40 


4054 


23 


4055 


4E 


4056 


05 


4657 


CC5B40 


405A 


C9 


405B 


C'5 


405C 


0E03 


495E 


11AF40 


4061 


CD7240 


4064 


2A3E41 


367 


7C 


4068 


B5 


4069 


CA8540 


406C 


CI 


406D 


47 


406E 


21BD40 


4071 


C9 


4072 


CD4000 


4075 


3ABB40 


4078 


B7 


4079 


C27D40 


407C 


C9 


407D 


0E0C 


497F 


11B940 


4082 


CD4000 


4085 


CD9040 


4088 


0E09 


408A 


11B940 


408D 


CD4000 


4090 


0E0D 


4092 


CD09F8 


4095 


0E0fl 


"63? 


CD09F8 


-+09A 


C9 


409B 


0100 



WRT 



GNC : 



RD ; 



SVS: 



ERR: 



DONE : 



CRLF : 



RBLK : 



CALL 

MOV 

CALL 

CALL 

MOV 

CPI 

JNZ 

CALL 

JMP 

I NX 

MOV 

DCR 

CZ 

RET 

PUSH 

MVI 

LXI 

CALL 

LHLD 

MOV 

ORA 

JZ 

POP 

MOV 

LXI 

RET 

CALL 

LDfl 

ORA 

JNZ 

RET 

MVI 

LXI 

CALL 

CALL 

MVI 

LXI 

CALL 

MVI 

CALL 

MVI 

CALL 

RET 

DW 



C, M 

CO 

GNC 

A. C 

LF 

WRT 

CO 

LOOP1 

H 

C, M 
B 
RD 



B 

C, READ 

D, RBLK1 
SVS 
ACTUAL 

A, H 
L 

DONE 
B 

B, A 

H, BLIF-1 



ISIS 
STATUS 
A 
ERR 



C, ERROR 

D, EBLK 
ISIS 
CRLF 

C, EXIT 

D, XBLK 
ISIS 

C, CR 
CO 

C, LF 
CO 



i OUTPUT FIRST CHAR 

; GET 2ND CHAR 

.: SEND CHARS TO : CO : UNTIL NEXT LF 



GET CHAR FROM BUF 



IF LAST CHAR IN BUF, READ 128 CHAR FROM 



IF ACTUAL = 0, DONE 
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*S 8« 

:OGRflr 


J80 MflCR 
1 LERR 


:0 ASSEMBL 


ER, 


VI. 

9/16/76 


409D 


BE40 




DW 


BUF 


489F 


8000 




DW 


128 


40H1 


3E41 




DW 


ACTUAL 


40R3 


BB40 




DW 


STATUS 


40A5 


AF40 


OBLK: 


DW 


AFTN 


40A7 


BE40 




DW 


BUF 


40A9 


0100 




DW 


1 


48RB 


0000 




DW 





40flD 


BB40 


RBLK1 : 


DW 


STATUS 


40AF 




AFTN: 


DS 


2 


40B1 


BE40 




DW 


BUF 


40B3 


8000 




DW 


128 


40B5 


3E41 




DW 


ACTUAL 


40B7 


BB40 


EBLK: 


DW 


STATUS 


40B9 


BB40 


XBLK: 


DW 


STATUS 


3BB 




STATUS : 


DS 


2 


40BD 




TEMP: 


DS 


1 


48BE 




BUF: 


DS 


128 


413E 




flCTURL : 


DS 


2 


4148 




STACK : 


DS 


10 


4000 






END 


BEGIN 
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Ref. # AE5 



insite INTEL * users library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 D8080 D3000 □ 



Other. 



(use additional sheets if necessary) 



TRACE VER 7.0 



TRACE single-step through any user's program for a keyed 
number of instructions or until DI executed. It displays 
the user's registers flags, op-code mnemonic and data after 
each instruction. The monitor routines may be used at any 
time to control execution. The user's programme may be in 
RAM, ROM or both. y 

MDS, Console 



MDS Monitor Ver 1 
ISIS (Optional) 

MDS Monitor users load own program and TRACE and go to TRACE 
with a breakpoint at their start address. ISIS users may 
command - TRACE FILENAME where FILENAME is a binary file. 
Escape to ISIS and to the Monitor is provided with .G (C R ) 
to restart TRACE. DI (0F3H) may be put at any number of 
breakpoints and CLEAR is a run to breakpoint without printing 
command. 



See example. 

Note that interrupts below level 2 cannot be used. 

CI cannot be used, CO works only on single shot 
DI cannot be traced - it acts as a breakpoint 
EI is not traced correctly. 



Registers Modified: 

N/A 



RAM Required: MDS 1021 bytes 
ISIS 1107 hvtP. 



ROM Required: 

None 



Maximum Subroutine Nesting Level: 

N/A . ^ bytes user's stock 



Assembler/Compiler Used: 
ISIS 8080 MACRO ASSEMBLER 



Programmer: 

C. J. Lusby Taylor 



Company: 
Satchwell Control Sys . Ltd. 



Address: 
P. 0. 



Box 5 7 



City: 
Farnham Road 



State: 

. SLOUGH, Berks 



J 



© Intel Corporation, 1976 
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MICROCOMPUTER USER'S 
in*L_ LIBRARY SUBMITTAL FORM 



Ref. # AB6U 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004 □ 4040 □ 8008 XX 8080 



Program 
Title 

Function 



(use additional sheets if necessary) 



ADCCP Remainder Routine 

S^f^cf^ ^°? remainder term R (X) as described in ADCCP document 
XJ534/589 draft 5, pages 74-76. The ADCCP generator polynonial is 
P (X) = X 16 + Xl2 + x? + 1. see attached ^ for J&!££^ " 



Intel 8080 MLcrocomputer 



This routine can run as a subroutine to a main progran. The main program 
fSS'L , PV^ ^^ ^^ message byte, most significant byte first: 
WLth the initial byte, the re m ai n d er , which is in the B and C registers 
must be preset, which for ADCCP is a value of all ones. Of course, the 
a and C register values generated by the routine must be returned to the 
routine along with subsequent message bytes. PUSH, POP, RET, etc. instruc- 
tions are added according to users design. 

A Register - Message data bytes 

B Register - High order bits of R (X) 

C Register - low order bits of R (X) 



For a string of bytes to be transmitted the R (X) generated by this 
routine, upon being inverted, can become the final two bytes of the 
transmitted ^sequence, i.e. the Frame Check Sequence. For a string of 
bytes that has been received, B and C will contain 1DH and 0FH respective- 
ly, if the transmitted sequence has been received without error The 
foregoing assumes that both B and C registers are preset to all ones. 



Registers Modified: 
A, B, C, D, E 



RAM Required: 

22H 



ROM Required: 




Maximum Subroutine Nesting Level: 
Does not alter current rrenriirmn 



Assembler/Compiler Used: 
8080 Macro Assembler Version 1.0 



Programmer: 



George H. Mineah 



Company: 
Aeronutronic Ford Corporation 



Address: 2 880 E. Fountain Blvd. 

Colorado Springs, CO. 80910 
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ISIS 8088 MACRO ASSEMBLER, VI. 6 



PAGE 1 



3D00 




3D00 


AS 


3D01 


57 


3D82 


0F 


3D03 


0F 


3D04 


0F 


3D05 


0F 


3D06 


E60F 


3D08 


AA 


3D09 


5F 


3D0A 


07 


3D0B 


07 


3D0C 


07 


3D6D 


07 


3D0E 


E6F0 


3010 


A9 


3D11 


47 


3D12 


7B 


3D13 


0F 


3D14 


0F 


3D15 


0F 


3D16 


E61F 


JD18 


AS 


3D19 


47 


3D1A 


7B 


3D1B 


8F 


3D1C 


0F 


3D1D 


0F 


3D1E 


E6E8 


3D20 


AB 


3D21 


4F 


3D22 


76 


8000 





ARR: 



REF. NO. AB64 

PROGRAM TITLE ADCCP REMAINDER ROUTINE 



ADCCP REMAINDER ROUTINE 

IN: 
;A=MESSAGE BVTE MOST SIGNIFICANT FIRST 

;B=HIGH ORDER BITS OF R<X> PRESET TO FFH FOR FIRST BVTE 
;C=LOW ORDER BITS OF R<X> PRESET TO FFH FOR FIRST BVTE 

OUT: 

B=HIGH ORDER BITS OF R<X) 
;C=LOW ORDER BITS OF R<X> 



ORG 

XRA 

MOV 

RRC 

RRC 

RRC 

RRC 

AN I 

XRA 

MOV 

RLC 

RLC 

RLC 

RLC 

AN I 

XRA 

MOV 

MOV 

RRC 

RRC 

RRC 

AN I 

XRA 

MOV 

MOV 

RRC 

RRC 

RRC 

AN I 

XRA 

MOV 

HLT 

END 



3D00H 
B 
D, A 



0FH 
D 
E, A 



8F0H 
C 

B, A 
A, E 



1FH 
B 
B, A 

A, E 



0E0H 

E 
C, A 
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Ref. # AB65 



insite INTEL * USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 D8080 D3000 □ 



Other. 



(use additional sheets if necessary) 



WIPE 



"Automates" the process of file deletion on ISIS diskettes 
Only those files with attributes of W = El and F = can be 
wiped. 



MDS with floppy disks 



ISIS 



File name of file that contains replica of normal directory 
of the diskette to be "wiped". If this name is for example 
TEMP from - DIR to TEMP$1 then: 

1. WIPE TEMP allows one to select files to be deleted, 

2. WIPE TEMP$A deletes all files that are not format 
or write protected. 



At console get displayed names of files up for deletion 

(if condition (1)). Type "Y" to query if you want to delete 

"N" if not. 



Registers Modified: 
ALL 


Programmer: 

Bob Glossman 


RAM Required: 
16K System Minimum 


Company: 

Stanford University 


ROM Required: 


Address: 

c/o V. Grinich ERL 101 


Maximum Subroutine Nesting Level: 


City: 
Stanford 


Assembler/Compiler Used: 
MDS MAC 8 


State: 

California 94305 



Intel Corporation, 1976 
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Ref . # AB66 



insite " mEL ° users library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D4004 D4040 D8008 H8080 D3000 D Other. 



(use additional sheets if necessary) 



TABS 



Takes files that use control-I as tab character and expand 
tabs so that legible listings can be obtained. 



MDS with diskette system. 



ISIS 



Source file and (optionally) destination file, i.e, 

— TABS PROG 1 

or 

-- TABS PROG 1 to PROG 2 



If no destination file used (i.e. to etc. omited) create 
a new file PR0G1.TBS with tabbing done. Otherwise the 
file PR062 will contain the tabbed result. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
MAC80 



Programmer: 

Bob Glossman 



Company: 

Stanford University 



Address: 
c/o V. Grinich IOIERL 



City: 
Stanford 



State: 
California 94305 



© Intal Corporation, 1976 



4-358 s» 8 ° 3 « c 



Ref . # AA13 



insito INTEL * user, s l ibrary submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 XX 8080/8085 D 8086 D Other. 



(um additional ahaata if nacaaaary) 



INTELLEC MICROCOMPUTER DEVELOPMENT SYSTEM DIAGNOSTIC CONFIDENCE 
TEST VERSION 1.1 

Exercise Intellec Microcomputer Development System to verify 
functionality. 



Intellec MDS 800 



REVISED TO VERSION 1.1 6/79 



None 



System functionality 



DISKETTE AVAILABLE IN OBJECT CODE ONLY. 
LISTING IS IN SOURCE CODE. DISKETTE IS 
PRICED AT $35.00. PAPER TAPE IS NOT 
AVAILABLE. 



CAUTION: BEFORE USING THIS IROGRAM, READ INSTRUCTIONS THOROUGHLY. 



Registers Modified: 



ALL 



RAM Required: 



16 K 



ROM Required: 



None 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



Programmer: 



Company: 



Address: 



City: 



State: 



6/79 



4-360 



Ref . § AB67 



insile " INTEL ' USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 H8080 D3000 □ Other. 



(use additional sheets if necessary) 



Intellec 8/Mod 80 Text Editor 
Text Editor 



Intellec 8 /Mod 80 and TTY 



Mod 80 Monitor 



Listing available from Insite for 
a prepaid $15.00 handling fee. 
Paper tape is not available except 
when ordering system. Program 
Diskette not offered. 



Registers Modified: 



All 



RAM Required: 



prox 4K bytes 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



PL/M 



Programmer: 



Company: 



Address: 



City: 



State: 



© Intal Corporation. 1976 



4-362 98 034C 



Ref. # AB68 



inSJte INTEL * USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 08080 D3000 □ Other. 



(use additional sheets if necessary) 



2708 Prom Programmer for Intellec 8/MOD80 

To program, read, and , verify a 2708 type PROM of up to 1024 
Bytes. This cannot be done using the Prom logic of the 
Intellec 8/MOD80 or Intellec MDS Monitor because of the 
special programming algorithm required by the 2708. 



Intellec 8 MOD80 or Intellec MDS and Universal Prom Pro- 
grammer (UPP) 



System Monitor 



See Text of Program 



Listing available form Insite for a 
prepaid $15.00 handling fee. Paper 
tape is not available except when 
ordering system. Program Diskette 
is not offered. 



Registers Modified: 
.11 



tegis 

A] 



RAM Required: 
1.5K 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
8080 Macro Assem- Ver. 2.3 



p r r>"rammer- 



Company: 



Address: 



City: 



State: 



© Intel Corporation, 1976 



4-364 



98 034 C 



Ref. # AB69 



HlSlt^ IWTEL * USER 'S LIBRARY SUBMITTAL FORM 

D4004 D4040 D8008 08080 D3000 D Other 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



Intellec 8/MOD80 Monitor 

Controls Intellec 8/MOD80 
Routines for 

Intellec 8/MOD80 



See Listing 



See Listing 



Listing available form Insite for a 
prepaid $15.00 handling fee. Paper 
tape is not available except when 
ordering system. Program Diskette 
is not offered. 



Registers Modified: 



e m 



RAM Required: 
2K 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
8080 Macro Assem. 



Ver. 2.2 



Programmer: 



Company: 



Address: 



City: 



State: 



lnt«l Corporation, 1976 



4-366 



98 034 C 



Ref . # AB70 



insite INTEL> USER'S LIBRARY submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D4004 D4040 D8008 D8080 D3000 □ Other. 



(use additional sheets if necessary) 



Intellec/MDS Monitor Version 2 

Intellec/MDS Interactive Program for Handling Six I/O 
Devices, and Utility Routines for Display/Modify 8080 
Memory and Registers. 



Intellec MDS 



See Program Listing 



See Program Listing 



Listing available form Insite for a 
prepaid $15.00 handling fee. Paper 
tape is not available except when 
ordering system. Program Diskette 
not offered. 



Registers Modified: 



All 



RAM Required: 



2K bytes 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

808 Macro Assembler Ver. 2 . 4 



Programmer: 



Company: 



Address: 



City: 



State: 



© Intel Corporation, 1976 



4-368 



98 034 C 



iny 



MICROCOMPUTER USER'S *>* ■> mr 
LIBRARY SUBMITTAL FORM 



D 4004 D 4040 D 8008 3 8080 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



Utility Macros for 8080 

Save time in coding and debugging 8080 programs. 



PDP-11 Cross Assembler for 8080 (e.g. Intel Library Ref no. c2) 



If other assemblers are used, modify syntax accordingly. 



Macro expansions 



Registers Modified: 

n/a 


Assembler/Compiler Used: 

PDP-11 Cross Assembler 


RAM Required: 

n/a 


Programmer: 

Alan C. Hui 


ROM Required: 

n/a 


Company: 

STANDARD ENGINEERING CORP. 


Maximum Subroutine Nesting Level: 

n/a 


Address: 

44800 Industrial Drive^ FremAnt 



4/77 



98-034B 

4-370 



Ref. # AB73 



inSltp " INTEL> USERS LIBRARY SUBMITTAL FORM 



O4004 D4040 D80OS 08080 D3000 B Oth.,_SB£_£D /JJJ 0di „ o ™, «,,.„ „ TO «„ ry , 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



I/O Port Exerciser 



The program allows the user to output patterns to PPI 
ports and to read and print input port values under 
keyboard control. 



SBC 80/10, TTY or RSZ32-C compatable terminal 



EXERCISER PROM 



see write up 



see write up 



Registers Modified: 



ALL 



RAM Required: 



100 bytes 



ROM Required: 



1024 bytes 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

MDS MACRO Assembler 



© Intel Corporation, 1976 

4/77 



Programmer: 



Jeffrey W. Scott 



Company: 



Computer Applications 



Address: 



30 30 Bridgoway 



City: 



Sausalito 



State: 



California 94965 



98 034 C 

4-372 



Ref . # AB75 



inSlte" ' NTEL ' USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 38080 D3000 □ Other. 



(use additional sheets if necessary) 



Fly Reader Driver 



1. 
2. 
3. 



Sets up user 10 entry pt. for monitor 
Generates read CMD for reader 

Inputs ASCII character and sets carry if no char 
for 15 us 



Fly Reader 30 - Teleterminal Corp. 

12 Cambridge Street 
Burlington, Ma. 01803 

(Plugs into TTY plug on MDS 80 0) 



Returns ASCII character in a register; sets carrv if 
no character read in 15 us. 



Registers Modified: 
A 



RAM Required: 
025H 



ROM Required: 




Maximum Subroutine Nesting Level: 




Assembler/Compiler Used: 

8080 MDS Assemb. V. 1 .n 



Programmer: 
William J. Casey 



Company: 

Logic Sciences 



Address: 

6420 Hillcroft. # 31 7 
City: 

Houston 



State: 
— Texas 



77081 



© Intel Corporation, 1976 

4/77 



98 034C 

4-374 



I_.S 8880 MACRO ASSEMBLER, VI. 



PAGE 1 



i REF. NO. AB75 

; PROGRAM TITLE FLV READER DRIVER 



"FLY READER DRIVER' 



3FEF 






ORG 3FEFH 


3FEF 


0038 




DW 3800H 


3800 






ORG 3800H 


00F9 




PTR 


EQU 0F9H 


©OFF 




RTC 


EQU 8FFH 


3800 


C5 




PUSH B 


3801 


060F 




MVI B, OFH 


3803 


3E08 




MVI A, 8 


3805 


D3F9 




OUT PTR 


3807 


3E0C 




MVI A, 0CH 


3809 


D3F9 




OUT PTR 


380B 


DBF9 


STAT: 


IN PTR 


30D 


E602 




ANI 2 


380F 


CA2138 




JZ DATA 


3812 


DBFF 




IN RTC 


3814 


DBFF 




IN RTC 


3816 


CA0B38 




JZ STAT 


3819 


05 




DCR B 


381A 


C20B38 




JNZ STAT 


381D 


AF 




XRA A 


381E 


37 




STC 


381F 


CI 




POP B 


3820 


C9 




RET 


3821 


DBFS 


DATA: 


IN 0F8H 


3823 


2F 




CMA 


3824 


CI 




POP B 


3825 


C9 




RET 


0000 






END 



; READER I/O ENTRV POINT 



i INITIALIZE COUNTER 

i GENERATE READ COMMAND PULSE 



INPUT PTR STATUS 



INPUT REAL TIME CLOCK STATUS 



; DECREMENT COUNTER 



■> SET CARRV FOR NO DATA IN 15MS FROM READ 



; INPUT DATA 



4-376 



Ref. # AB76 



insite— J rj I El iJ L,SER l s lib Rary submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 XQQ8080 D3000 □ Other. 



(use additional sheets if necessary) 



NON-ENCODED KEYBOARD SUBROUTINE HANDLER 



(SEE COMMENTS ON ATTACHED SOURCE LISTING) 



Pointers to keyboard processing routines (PKYB1, PKYB2) 
subroulinf 1 ^ F 2? e ° alling pr °^ am ^f ore entering the 

EaSE Serruft^ keY d6PreSSi0n t0 g -era~ e e^ernal 



B-REGISTER = key switch code 

(Re-arranging the keyboard look-up table assi^n^ a ^ ffoT , on+ 

key switch code to the switch mat?ix crostpoin?! .) dlfferent 



Registers Modified: 
A,B,C,D,E,H.L 



RAM Required: 

3 bytes 



Programmer: 
VITO A. TRTT,TTT.T,p 



ROM Required: 

D4H bytes 



Maximum Subroutine Nesting Level: 

(Depends on calling program) 

Assembler/Compiler Used: 

ICOM FDOS-II Macroassembler 



Company: 
COMPUTER CONSULTANT 



Address: 
2940 BRAUN COURT 



City: 
GOLDEN 



State: 
COLORADO 



80401 



4/77 



4-378 



Ref.# AB77 



insite INTEL ° USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 &8080 D3000 □ Other. 



(use additional sheets if necessary) 



LOAD 



To allow loading of ISIS-II absolute object modules into the area of 
ROM occupied by ISIS-II. (i.e. below 3180H) 



Intel lee MDS-800 

Single or Dual Drive Floppy Disk System 

System Console 



To Compile: PL/M-80 and ASM80 
To Execute : ISIS-II 



Name of file to be LOADED 
e.g. 

- LOAD :FI:TEST.PRC 



The program will print out the load address and start address of 
LOADED program or) the system console and then exit to the monitor. 
To execute the program just loaded, use the monitor "GO" command 
with the start address given by the "LOAD" program. 



Available in Object Code with a source 
listing. Diskette available in 
source code. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Programmer: 

Ron Wi I I iams 



Company: 



Address: 



City: 



Assembler/Compiler Used: 
PLM-80, ASM8Q 



State: 



© Intel Corporation, 1976 

4/77 



98 034 C 

4-380 



THIS PROGRAM ALLOWS THE LOADING OF ISIS-II OBJECT MODULES WHICH HAVE 
A LOAD ADDRESS WITHIN THE ISIS-II PROGRAM AREA (I.E. BELOW 3180H) 
THE PROGRAM TO BE LOADED MUST BE IN ABSOLUTE BINARY FORMAT. LOADING 
OF RELOCATABLE MODULES IS NOT ALLOWED EITHER BY THE 'LOAD' PROGRAM 
OR BY THE ISIS-II BINARY LOADER. 

TO EXECUTE THE 'LOAD' PROGRAM, SIMPLY TYPE THE WORD "LOAD" FOLLOWED 
BY ONE OR MORE SPACES AND THE NAME OF THE FILE TO BE LOADED. 

FOR EXAMPLE: LOAD :F1:COMP.ABS 

AFTER THE FILE HAS BEEN LOADED, THE PROGRAM WILL PRINT THE LOAD ADD- 
RESS AND START ADDRESS ON THE SYSTEM CONSOLE AND THEN EXIT TO THE 
INTELLEC MONITOR. YOU CAN THEN EXECUTE YOUR PROGRAM BY TYPING "G" 
FOLLOWED BY YOUR PROGRAM'S START ADDRESS. 

FOR EXAMPLE: GIOO 

TO INSTALL THE 'LOAD' PROGRAM IN YOUR ISIS-II SYSTEM USE THE FOLLOWING 
STEPS : 

1) USING THE ISIS-II TEXT EDITOR, GENERATE THE "SUBMIT" FILE SHOWN 
BELOW. . . 

PLM80 :F1: LOAD. SRC 
"E (CONTROL/E) 
ASM80 :F1:MOVER.SRC 

LINK :F1:LOAD. OBJ, :F1:MOVER. OBJ, SYSTEM. LIB TO & 

:F1:LOAD.LNK 

LOCATE :F1:LOAD.LNK CODE (3200H) 

2) THE CONTROL/E ABOVE ALLOWS YOU TO TAKE OUT THE PL/M-80 DISKETTE 
AND INSERT THE ISIS-II DISKETTE BEFORE CONTINUING WITH THE 
INSTALLATION. AFTER INSERTING THE ISIS-II DISKETTE, TYPE A 
CONTROL/E TO CONTINUE WITH THE ASSEMBLY, 

3) THE "SUBMIT" FILE ALONG WITH THE TWO SOURCE FILES SHOULD ALL BE 
ON DRIVE 1. BY PUTTING THE "SUBMIT" FILE ON A FILE CALLED 
'LOAD.CSD' IN DRIVE 1 AND TYPING IN: 

SUBMIT :F1:LOAD 
YOU WILL HAVE THE 'LOAD' PROGRAM ON DRIVE 1. 



4-382 



Ref. # AE6 



insite " INTEL * USERS library submittal form 



D4004 D4040 D8008 B8080 D3000 D Other. 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



SCAN 



Scans a listing file held on a diskette and prints assembly error on 
the line printer 



MDS 800, Diskette, Line Printer, Terminal 



ISIS Operating System 



Filename (from terminal) 



Prints assembly errors on line printer. 



Registers Modified: 


Programmer: 

C. D. Saunders 


RAM Required: 

955 Bytes + ISIS 


Company: 

Marconi Instruments 


ROM Required: 


Address: 

Longacres St. Albans 


Maximum Subroutine Nestinq Level: 

2 


City: 

Hertfordshire 


Assembler/Compiler Used: 

(MDS 800) 808n 


State: 
U.K. 



© Intel Corporation. 1976 

4/77 



98 034C 

4-384 



Ref.# AB78 



inSlte" INTEL> USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 K8080 D3000 □ Other. 



(use additional sheets if necessary) 



Driver for Tektronix 4010 
Grafic Screen 

Procedures for controlling Tektronix 4010. 
These procedures make it possible to use the 
4010 as a grafic output unit for 8080. 



TTY on port and 1. 



Console input and console output routines, 



Registers Modified: 



all 



RAM Required: 



3/4 K 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



Programmer: 



Henning Nielsen 



Company: Institut for Elektro- 
niske Systemer 



Address: Aalborg University 
Centre 



City: P.O.BOX 159 

9100 Aalboro 



State: 



Denmark 



© Intel Corporation, 1976 



6/8/77 



98 034C 

4-386 



Ref.# AB79 



insite ,NTEL ° users library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 

Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 K18080 D3000 □ Other. 



(use additional sheets if necessary) 



T.I. SILENT 700 - SBC 80 MONITOR INTERFACE 

Allows SBC 80 monitor to be used with T.I. Silent 700 terminal in place 
of teletype. Tape operations operate at 120 characters/second. 



A. 

B. 



1) 
2) 



SBC, power supply, etc., set-up for 1200/300 baud operation 
I.I. /33 ASR terminal equipped as follows: 

™ ( ? U+ ° ma+ic Devfce Con+rol) 2LRDC (Remote Device Con+rol) 
1200 baud -- If 1200 baud option is not available, replace 
the statement „ 

CALL HIGH 

with three (3) NOP instruction wherever CALL HIGH 
appears (at RDRON + 3 and PCH0N). 

SBC monitor with modifications as described. 

Accepts all monitor commands as specified in Intel documentation, with 
two exceptions: an additional carriage return is required after the 
issuance of and one is required at the completion of the R and W 
commands to permit tape operations at 120 characters/sec. The ADC 
or RDC option may be omitted if the tape p laybac^record mechanism 
is operated manually. 



Identical in operation with SBC 80 monitor, excepting changing 
terminal speed (optional). 



Registers Modified: 

A- C. F/F'q 



RAM Required: 

Same as SBC 80P monitor 



ROM Required: 

192 BYTES 



Maximum Subroutine Nesting Level: 
3 



Assembler/Compiler Used: 



Programmer: 

Wi I I Jam M Q o}fprt 



Company: 

Los Alamos Scientific Laboratory 



Address: 

P.O. Box Ififi-S , My^7 



City: 



Los Alamos 



State: 



MAC80 Macro A^Amhlgr Vor, 7.4 1 New Mexico 87545 



© Intel Corporation, 1976 

6/8/77 



98 034 C 

4t388 



insite 



Ref. #AB80 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 08080 D3000 □ Other 



(use additional sheets if necessary I 



GLANCE 

To provide an easy way to visually examine a lengthy diskette resident 
text file. The file is transfered, line by line, to the CRT console 
with tab characters replaced by spaces. The display can be frozen and 
the speed of output changed. Quick jumps of maximum 25600 characters 
can be specified, both forward and backward. After such a jump the 
CRT screen will be filled up with text and the display frozen. 

MDS 800 with diskette and CRT. 



ISIS or ISIS-II 

Monitor routines: Console status test (CSTS) 
Console input (CI) 

Filename of the text file to be examined. 
ISIS command: GLANCE filename. 



Run time commands: 



1. N (numeric) will change the speed of output 

2. +N forward jump -) n 

3. -N backward jumpj by 50 * 2 characters 

4. Control C to exit to ISIS 



Text file output to console. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

Intellec MDS Macro Assembler 



Programmer: 

Esko Lehtinen 



Company: 

AB Bofors, dept. KCN 



Address: 
P.O. 



Box 500 



City: 



S-690 20 Bofors 



State: 



Sweden 



© Inul Corporation, 1976 



6/8/77 



98 034 C 

4-390 



iny 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref.# AB81 



D 4004 □ 4040 □ 8008 □ 8080 □ 3000 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



Keyboard Scanner 

Allows one to use a key matrix keyboard as the Console I/O device for 
a SDK 80 board, (converts key matrix to ASC II.) 



SDK 80 board with standard I/O (8255 at 0F4H). Any switch closure key 
matrix keyboard IK RAM on SDK 80. y 



SDK 80 Monitor 



See attached sheet 



ASC II coded character in register A. 



Registers Modified: 

A, Flags 



RAM Required: 

IK 



ROM Required: 

256 bytes 



Maximum Subroutine Nesting Level: 
2 



Assembler/Compiler Used: 

Intel lec MCS 80 Assembler 



Programmer: 

Lindsay Weaver 



Company: 

Mass. General Hospital Anesth, 



Address: B io-Eng. Unit 

Fruit St., Boston, Mass. 021; 



98-034C 



6/8/77 



4-392 




Example of Hew to Interface 
to an 80 Key Matrix 



4-394 



ISIS 8980 MACRO ASSEMBLER.. VI. 1 



PAGE 1 



REF. NO. AB81 

PROGRAM TITLE KEYBOARD 



SCANNER 



1000 



1000 


CD1510 


CI : 


CALL 


SCAN 


1003 


D29010 




JNC 


CI 


1006 


C9 




RET 




0218 




FRET 


EQU 


218H 


0343 




SRET 


EQU 


343H 


1997 

100A 


CD1510 
D20710 


BREAK : 


CALL 
JNC 


SCAN 
BREAK 


190D 
109F 

1912 


FEIB 

CA4303 

C31802 




CP1 
JZ 
J MP 


SRET 
FRET 



ORG lbi0fciH 

.WHEN THESE ROUTINES ARE USED TO REPLACE CI AND BREAK 

; IN THE SDK MONITOR, THE INSTRUCT I ONb . 

; MVI A. '=J8H / OUT 0F7H SHOULD BE ADDED TO THE 

; INITIALIZATION SECTION TO INITIALIZE THE 8255 

i SUBSTITUTE FOR. THE SDK CONSOLE IN ROUT I 



SUBSTITUTE FOR THE SDK BREAK ROUTINE 
27=ESC THE SDK BREAK CHAR. 



SCAN : 



;Sf:AN IS A SUBROUTINE THAT SCANS THE KEYS ONCE. 

. IF fi ,- Hfl p is TO BE RETURNED THE CARRY BIT Ib_bET 

's HMD THE CHAR. IS IN A ON RETURN, IF NO CHAR lb TO BE 

.; RETURNED THE CARRY IS ZERO ON RRETURN 

; DESTROYS: A, F/F''S 

; INPUTS: NONE 

i OUTPUTS : A, C-FLAG 

} CALLS: NOTHING 



00F4 




PA 


EQU 


0F4H 


00F6 




PC 


EQU 


0F6H 


00F7 




PCN 


EQU 


0F7H 


1015 


3E0y 




MVI 


A, 9 


1017 


D3F6 




OUT 


PC 


1019 


C5 




PUSH 


B 


101A 


D5 




PUSH 


D 


101B 


E5 




PUSH 


H 


101C 


0EO4 




MVI 


C, 4 


101E 


06FF 


SC2: 


MVI 


B, 255 


1020 


05 


SC4 : 


DCR 


B 


1021 


C22O10 




JNZ 


SC4 


1024. 


9D 




DCR 


c 


1025 


C21E10 




JNZ 


SC2 


1028 


4F 




MOV 


C, A 


1029 


OS0A 




MV I 


B, 10 



-, 8255 PORT ADDRESSES 

; SET OUTPUT FOR FIRST SCAN 



;SAVE REGISTERS 

;THIS V-- A DELAY TO PREVENT KEY BuUNcE F 

j CAUSING MULTIPLE ENTRIEb 



.; I NIT. C 

; PUT INDEX IN B 



4-396 



ISIS 8088 MACRO ASSEMBLER, VI. 1 



PAGE 2 



102B 

102E 

1031 

1032 

1033 

1034 

1036 

1037 

1038 

1039 

103A 

103B 

103C 

103E 

103F 

1040 

1041 

1042 

1043 

1046 

1049 

1040 

104C 

104D 

1050 

1651 
1652 
1055 
1056 
105? 
105A 
105B 
105C 
105D 
105E 
105F 

1060 

1061 
1062 
1063 
1066 
1067 
106A 
106C 
106D 
106F 
1072 
1074 
1075 
1076 



219F11 

11A911 

0D 

23 

13 

DBF4 

F5 

B6 

2F 

EB 

7? 

79 

D3F6 

EB 

Fl 

2F 

77 

05 

C23110 

21AA11 

060A 

7E 

B7 

C25A10 

23 

05 

C24B10 

37 

3F 

C37E10 

4F 

?8 

2D 

87 

8? 

8? 

47 

?S 

IF 

DA6A18 

04 

C26210 

DBF6 

2F 

E62S 

CA7610 

3E50 

80 

47 

210011 



SC05: 



SC20; 
SC25: 



SC30 



SC35: 



SC40 : 



SC45 : 



LXI 

LXI 

DCR 

I NX 

I NX 

IN 

PUSH 

ORA 

CMA 

XCHG 

MOV 

MOV 

OUT 

XCHG 

POP 

CMA 

MOV 

DCR 

JNZ 

LXI, 

MVI 

MOV 

ORA 

JNZ 

I NX 

DCR 

JNZ 

STC 

CMC 

JMP 

MOV 

MOV 

DCR 

ADD 

ADD 

ADD 

MOV 

MOV 

RAR 

JC 

INR 

JNZ 

IN 

CMA 

AN I 

JZ 

MVI 

ADD 

MOV 

LXI 



H, KEV-1 

D, KEVN-1 

C 

H 

D 

PA 

PSW 

M 



;GET POINTERS TO SCAN TABLES 



M, A 
A, C 

PC 

PSW 

M, A 

B 

SC05 

H, KEVN 

6, 10 

A, M 

A 

SC30 

H 

B 

SC25 



SC99 
C A 

A, B 
A 

A 
A 
A 

B, A 
A, C 

SC40 
B 

SC35 
PC 

20H 
SC45 

A, 88 
B 

B, A 

H, ASCII 



J GET RESULTS 
; STORE A 

i <kevs>*not<kev<:j)t-i> 
i STORE kevnc j> 

> SELECT 8 KEYS 

i STORE KEV (J) 

; DO THE LOOP 10 TIMES 

;LOAD INDEX IN B 

; GET BVTE 

; SET FLAGS 

■> IF ONE OF THE BITS IS SET GO FIND ASCII 



■ DO LOOP 10 TIMES 

; IF WE GET HERE NO KEV WAS PRESSED 
CLEAR CARRV AND RETURN 

SAVE A 



; B=<B-1>*8=J*8 

: GET OUT OF LOOP IF CARRV SET 
OFFSET NOW IN B, NOW CHECK SHIFT 



ADD 80 TO B IF SHIFT KEV IS PRESSED 
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1079 7D 




MOV 


A, L 


167A 80 




ADD 


B 


107B 6F 




MOV 


L, A 


107C 7E 




MOV 


A, M 


107D 27 


SC50 : 


STC 




107E El 


SC99 : 


POP 


H 


107F Dl 




POP 


D 


1080 CI 




POP 


B 


1081 C9 




RET 





iPUT ADDRESS OF ASCII CODE IN H, L 

.; GET ASCII 

.; SET CARRV FOR TRUE RETURN 



1082 


210011 


1085 


06A8 


1088 


77 


1089 


23 


1USH 


3C 


108B 


05 


108C 


C28810 


108F 


3E93 


1091 


D3F7 


1092 


AF 


1094 


060 A 


1996 


21A011 


1099 


7 7 


109A 


CL< 


109B 


05 


109C 


C29910 


109F 


CD1510 


10A2 


D29F10 


10A5 


CDC302 


10A8 


OE0D 


10AA 


CDF481 


10AD 


C39F10 



TEST! : 



T2: 



T4: 



; TE'-.T1 ALLOWS ONE TO FIGURE OUT THE REQUIRED ENTRIES FOR 
;THE TABLE ASCII FOR ANV KEVBOARD 



LXI 


H, ASCII 






MVI 


B, 160 






XRA 


A 






MOV 


M, A 






INK 


H 






INR 


A 






DCR 


B 






,TNZ 


T2 






MVI 


A.. 98H 






OUT 


PCN 






XRA 


A 






MVI 


B, 10 






LXI 


H, KEV 






MOV 


M, A 






I NX 


H 






DCR 


B 






JNZ 


T4 


.; IN IT. 


TABLE KEV 


CALL 


SCAN 






JNC 


T5 






CALL 


02C2H 


.; CALL 


NMOUT 


MVI 


C, ODH 


.; PUT C 


.:R IN C 


CALL 


01F4H 


.; CALL 


ECHO 


JMP 


To 







;.W:E THE TABLE ASCII HAS BEEN FILLED TEST2 ALLOWS ONE 
.; TO TEST SCAN BEFORE INSTALLATION ON PROM 



18B0 3E98 TEST2: 

10B2 D3F7 

10B4 AF 

16B5 06OA 

L&B7 21A011 

10BH 77 T24: 

10BB 23 

10BC 05 

10BD C2BA10 

1 C O C D 1 5 1 T 2 5 : 



MVI 


A, 98H 


OUT 


PCN 


XRA 


A 


MVI 


B, 10 


LXI 


H, KEV 


MOV 


C\, A 


I NX 


H 


DCR 


B 


JNZ 


T24 


CALL 


SCAN 
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10C3 D2C01Q 
10C6 4F 
10C7 CDE301 
10CA C3C010 

1100 
1100 



11A0 
11AA 





JNC 


T25 




MOV 


C, A 




CALL 


01E3H 




J MP 


T25 




ORG 


1100H 


ASCII : 


DS 


160 


KEY : 


DS 


10 


KEVN : 


DS 


10 



; CALL 



CO 



j THIS Ii A TABLE OF ASCII CODES FOR EACH 

> IT SHOULD BE IN RAM FOR DEBUGGING AND R 
.'FINAL INSTALLATION 

:■ KEY AND KEVN SHOULD BE IN RAM DURING BO 

> AND DEBUGGING 



Mtiyw 



END 



4-399 



Ref.# AB82 



iriSlte TEL * USERS LIBRARY SUBMITTAL FORM 
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(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



P2708 PROM Programming Routine 

Programs 2708 PROMS with data from ISIS-11 Locater/Assemb ler. An 8K 
RAM area is loaded. Any data outside this area is ignored (not loaded) 
An offset parameter allows selection of user address to Load. Auto- 
matic test for erased. PROM before programming. Range bell sounds at 
end of Programming. True/False data. Prints legal commands on request 
Compare and Move (Transfer). Filename set at initial start-up or can 
be changed in Load command. 

MDS with 32K RAM, UPP, 2708 Personality Card 



ISIS-11 V2.2 or Greater 



Disk File with absolute object code—can be produced by locater or 
assembler (using aseg). (Will reject any file that is not Absolute.) 
See sample run. 



REVISED 8/8/77 



Programmed and Verified 2708 PROMS. See sample run. 



Paper tape not available. 
Program offerred on Diskette only. 
Diskette is priced at $35.00. 



Registers Modified: 
Al I 



RAM Required: 

Non Resident 



ROM Required: 

Non Rfi^idftnf 



Maximum Subroutine Nesting Level 
Non Resident 



Assembler/Compiler Used: 

ISIS-11 8080/8085 Assembler V1.0 



Programmer: 

John F. Mahnny 



Company: 

Electra-Phvsics Labs Inc. 



Address: 

715 Sutter Street Mg | | 



City: 

Fo I som 

State: 

Ca I i forn i a 



95630 



© Intel Corporation, 1976 
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4-400 



-P2708 JFi:P2708 

2708 PROM PROGRAMMER » V2.0 

JL3680 

:lo 

*** no data loaded *** 

:l20oo xcmd.obj 

error 13 user pc 3a4c 

jl2000 jf1slcmd.0bj 

*** not an absolute file'*** 

*** no data loaded *** 

:L3680 5F1JP2708 

tPO 

INSERT PROM. TYPE CR TO CONTINUE 

PROM NOT ERASED 

INSERT PROM. TYPE CR TO CONTINUE- 



CALL PROGRAM AND SPECIFY TILE 

LOAD COMMAND 

ATTEMPT TO LOAD WITH "WRONG" OFFSET 

CHANGE OF FILE NAME 

FILE NON-EXISTANT (ISIS-II ERROR) 

ATTEMPT TO LOAD RELOCATABLE FILE 

LOAD ORIGINAL FILE 
PROGRAM A RROM 



TESTS AUTOMATICALLY FOR ERASED PROM 

NEW PROM INSERTED; IT PROGRAMS 4 COMPARES OK 

LOWER CASE COMMANDS NOT RECOGNIZED 



UNRECOGNIZED COMMAND 

!E 
-P2708 

2708 prom programmer. v2.0 

:l 

enter file name: p2708 

*** no data loaded *** 

J MO 

•INSERT PROM. TYPE CR TO CONTINUE 



EXIT 

CALL PROGRAM WITHOUT FILE NAME 



DEFAULT OFFSET =0 IF NONE SPECIFIED 
REQUESTS A FILE NAME 



MOVE A PROM INTO BLOCK 



J*FCBB 

.SSOOO 31-00 1F-00 42-00 OE-01 04-02 11-03 



CHANGE A FEW RAM LOCATIONS 



SCO 

INSERT PROM. TYPE CR TO CONTINUE 

PROM ADDReOOOOH 500D=00H BAD=31H 

PROM ADDR=0001H 600D=OOH BAD=1FH 

PROM ADDR=0002H GOOD-OOH BAD=42H 

PROM ADDR=0003H G00D=01H BAD-OEH 

PROM ADDR-0004H G00D=02H BAD-04H 

PROM ADDR=0005H G00D=03H BAD=11H 



:x 



COMPARE PROM WITH RAM; CHANGES MADE ARE FOUND 



LEGAL COMMANDS ARE: 



PRINT OUT LEGAL COMMANDS 



P (PROGRAM PROM) 

L (LOAD DISK FILE INTO 8K BUFFER) 

E (IF PROMPT, RETURN TO ISIS) 

(IF IN A COMMAND. ABORT THE COMMAND) 

T (SET TRUE DATA) (DEFAULT VALUE) 

F (SET FALSE DATA) 

C (COMPARE PROM WITH BLOCK IN 8K BUFFER) 

M (MOVE PROM INTO BLOCK IN 8K BUFFER) 

X (FOR THIS LIST OF COMMANDS) 

P. M. AND C REQUIRE A IK BLOCK NUMBER FROM TO 7. 

L REQUIRES AN OFFSET PARAMETER THAT 

SETS THE LOWEST USER ADDRESS IN THE 8K BUFFER. 

DEFAULT VALUE=0. I.E. USER ADDRESSES FROM OOOOH TO 1FFFH ARE LOADED. 

WITH A VALUE OF 2000. ADDRESSES 2000H TO 3FFFH ARE LOADED. ETC. 

L ALSO REQUIRES A FILENAME IF THE CURRENT FILE IS TO BE CHANGED, 

OTHERWISE THE LAST NAME ENTERED WILL BE USED, 

*** THE PROGRAM WILL REQUEST ANY PARAMETERS THAT IT REQUIRES. 



:e 



ETMT 
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INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 D8080 Q3000 npther ISIS 



(use additional sheets if necessary) 



Data General to Intel lee MDS Diskette Transport Package 

RDOS/ISIS IS A Data General computor resident diskette file 
maintenance package supporting Intel ISIS - format files on IBM 
compatible diskette drives. 



Data General computer, TTY console, 32-K memory, IBM compatible 
diskette drive and control ler 



Data General RDOS, ALGOL, and assembler. 
User - written diskette I/O driver 



1. Initialized ISIS diskettes. 

2. User files to be copied to diskette. 

3. Operator console commands 



1. Updated ISIS diskette. 

2. User diskette files read from diskette 

3. Diskette information: 

a. Sector Usage 

b. Directory Contents 



Registers Modified: 

N/A 



RAM Required: 

N/A 



ROM Required: 

N/A 



Maximum Subroutine Nesting Level: 
N/A 



Assembler/Compiler Used: 

D 6 ALGOL & Assemb I er 



Programmer: 

James T. Reynolds 



Company: 

SCI Systems, Inn. 



Address: 

8600 South Memorial Parkway 



City: 

Huntsvi I le 



State: 

ALABAMA 



35802 



Intal Corporation, 1976 
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Output 
Results 
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Program 

Title 

Function 



Required 
Hardware 



Required 
Software 



.Input 
Parameters 



(use additional sheets if necessary) 



Main routine DDUMP 
Diskette DUMP routine 

Subroutines SCAN, VDUMP, MULT 

The DDUMP routine dumps the content of the MDS diskette on the LIST 
device in both Hex and ASCII representation, and displays the error 
message (if any) on the CONSOLE device. The DDUMP is entered to the 
CONSOLE device, as a system command of the format DDUMP (:Fx:) 
(start track), (start sector), (end track), (end sector). (Refer to 
attached documents for details). 

MDS, MDS-DOS, CONSOLE device (CRT), LIST device (Line Printer) 



MDS monitor 
ISIS-I I 



DDUMP command parameters, (ISIS-I I system call READ) 

SCAN routine parameter block 

DDUMP I0PB Block (10 bytes) 

DDUMP Buffer for sector dump (128 bytes) 



Disk dump displayed on LIST device in Hex and ASCI 
representation, 16 bytes across. 

Error message (if any) on the CONSOLE device. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



Programmer: 

Raymond Sin 



Company: ITT Industries of Canada, 
Ltd. - SEL Division 



Address: p >0# Box 13gj Toron+0 . 
Dominion Centr e 



City: 

Toronto M5K 1H1 



State: 

Ontario 



© Inwl Corporation. 1976 
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insite iNTEL * USE R S LIBRARY submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



Description 



□ 4004 D4040 D8008 X38080 D3000 □ Other. 



(use additional sheets if necessary) 



Cross Reference for PAS8? PASCAL programs - XREF8? 

XREF80 - processes PAS8yT source programs to give a cross reference listing 
of all identifiers and frequency tally of key words. 



Intel lee MDS system with SkK bytes RAM memory, dual floppy disks, and 
CRT/TTY console. 



ISIS- 1 1 operating system and PAS8/J resident PASCAL interpreter. 



The input parameters are the MDS file name of a PASCAL source program 
to be cross referenced and the destination file name of the cross 
reference listing. 



The output result is the specified destination file which has a line 
numbered listing of the PASCAL source program followed by the cross 
reference of identifiers by line number occurrence and the key word 
frequencies. 

XREF80 is run by loading the PAS80 system and then executing the XREF 
program (XREF80 is written in PASCAL). The following is an example of 
a sample entry with all users inputs underlined. 

- PAS80 

PAS80 VM01-00 

*XREF(S0URCE. PAS, OUTPUT. XRF) 

TERMINATED AT LINE 003^3 

* 

This sequence would create a file called OUTPUT. XRF which is the 
cross reference listing of the PASCAL source program SOURCE. PAS. 



Registers Modified: 

ALL 


Programmer: 

BOB EICHENLAUB 


RAM Required: 

6AK RYTES 


Company: 

JOHN FLUKE MFG. CO. INC. 


ROM Required: 

NONF 


Address: 

P. 0. BOX 43210 


Maximum Subroutine Nesting Level: 


City: 

MTLK. TERRACE 


Assembler/Compiler Used: 

PAS80 y PASCAL COMPILER 


State: 

WASHINGTON 



Inttl Corporation, 1976 
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inSJtp 'NTEf USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D4004 D4040 08008 D8080 D3000 n Other SBC 80 , u 



se additional sheets if necessary) 



SBC 80/10 INTERACTIVE MONITOR 



Resident Interactive Monitor for the SBC 80/10, including the fol lowinq 
operator commands: ABORT, DISPLAY, FILL, PROGRAM EXECUTE, INSERT MOVE 
READ PAPER TAPE, SUBSTITUTE, EXAMINE. ' ' 



SBC 80/10 Singe I Board Computer, ASR-33 Tetetype Machine (or equivalent), 



(none) 



Keyboard commands are described fully in the listing. 



Some features of the Interactive Monitor are as follows: All commands 
are checked for validity before being executed. Paper tape input is 
buffered to allow checksum validation before being installed. The " 
"Program Execute" command permits the setting and clearing of breakpoints 
Provisions are made for a front-panel hardware interrupt switch, Th - 
entire Interactive Monitor occupies only 1024 bytes. 



The 



Program offered 
on diskette only. 



Registers Modified: 
All 



RAM Required: 
64 Bytes 



ROM Required: 
1024 Bytes 



Maximum Subroutine Nesting Level: 
10 



Assembler/Compiler Used: 
8080 MPS Macro Assembler. V7.7 



Programmer: 
Wayne Stahnke 



Company: 

Wayne Stahnke Company 



Address: 

2513 ?8th .S-t-r-PA-f- 



City: 
Santa Monica 



State: 

California 90405 



© Intel Corporation. 1976 
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insite " INTEL ' USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D40C4 D4040 D8008 &8080 D3000 nOther. 



(use additional sheets if necessary) 



I/O Routine for Tl Silent 700 Terminal 



?n e h?o^! Me lK 7 ?° ° n fn+erru P + driven basis, and perform data transfer 
m blocks without supervision of main program or executive program 



8251 Programmable communication interface using TxRDY and RxRDY as 
interrupt requests 

8214 Priority interrupt control unit using INT output to strobe 
interrupt vector into input port 8212 

Memory location 0038 H reserved for RST-7 branching point 



INPUT ROUTINE 
Entry from KSR 733 



OUTPUT ROUTINE 

HL-Address of first output character 

B- Number of output characters 

Output buffer memory CADR J250-129F ) 

n 



tnpat Buffer memory (ADR 1200-124F H ) 
containing input data block terminated 
with CR character 

Character counter (ADR 12A0-12A1u) 
Number of characters in input data block 



Registers Modified: 
None 



RAM Required: 

6 + J60 bytes for I/O buffer 



ROM Required: 256 bytes to store 
routine & branch table 



Programmer: 

Fred Lee 



Company: 

University of Calffornfa 



Maximum Subroutine Nesting Level: 
3 



Assembler/Compiler Used: 

8080 Macro Assembler. Ver. 2.0 



Address: 

.Depa rtment nf Pharmamingy 



City: 

School of Medicine 



State: 



> Intel Corporation, 1976 



Los Angeles. CA Qnn?4 
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insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/40 D8008 £18080 D8048 D8085 D3000 □ Other. 



(use additional sheets if necessary) 



TTY DIAGNOSTIC 

The TTY characters are output from the CPU to the TTY punch and 
console verifying correct operation of the CPU to TTY path. The 
paper tape which is punched can be read into the CPU, ("Echoing" 

characters ' 

Data Path. 



back to the TTY console), to verify the TTY to CPU 



TTY on Port & 1, 



8080 V3.0 Monitor (ORG 3800) 



Origin of Punch Routine is 2200 H. 
Origin of Read Routine is 22 1C H. 



The TTY Character set, is output to the TTY Console and punch in the 
first portion of the program. Following a RESET and RESTART at 
221C H the punched paper tape is read. The characters are output 
back to the TTY for comparison with the original data. The 
tape may also be verified in the local mode. 



paper 



Registers Modified: 

A. B. C. D f Flaqs 


Programmer: 

W. E. Barkman 


RAM Required: 

NONE 


Company: 

Union Carbide Corp. 


ROM Required: 

40 iq words 


Address: 

Box Y. Bldq. 9998, Stop 2 


Maximum Subroutine Nesting Level: 

1 


City: 

Oak Ridqe 


Assembler/Compiler Used: 

8080 V4.1 


State: 

Tennessee 37830 



Intel Corporation, 1976 
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; REF. NO. AA14 

j PROGRAM TITLE TTV DIAGNOSTIC 



2200 




380C 




3806 




3809 




2200 


163A 


2202 


0E21 


2204 


CD0C38 


2207 


0C 


2208 


15 


2209 


C20422 


220C 


OE0A 


20E 


CD0C38 


2211 


0E0D 


2213 


CD0C38 


2216 


C30022 


2219 


00 


221A 


00 


221B 


00 


221C 


CD0638 


221F 


4F 


2220 


CD0938 


2223 


C31C22 



i TTV INTERFACE DIAGNOSTIC 
> CHARACTERS ARE OUTPUT FROM 
i CPU AND PUNCHED ON TAPE 
i CONTINUOUSLY. READING THE 
J TAPE ECHOS CHARACTERS BACK 
; TO THE TTV. 



5TART : 



NEXT : 



NULL 



yyMM 









ORG 2200H 






PO 


EQU 380CH 






RI 


EQU 3806H 






CO 


EQU 3809H 


MVI 


D, 58 




i SET LOOP COUNTER 


MVI 


C, 21H 




; SET INITIAL CHARACTER 


CALL 


PO 






INR 


c 






DCR 


D 






JNZ 


NEXT 






MVI 


C, OAH 




.: LINE FEED 


CALL 


PO 






MVI 


C, ODH 




i CARRIAGE RETURN 


CALL 


PO 






JMP 


START 




.; PRESS RESET TO STOP 


NOP 








NOP 








NOP 








CALL 


RI 




i READ CHARACTER 


MOV 


C, A 






CALL 


CO 




.: ECHO TO TTV 


JMP 


NULL 






END 









4-416 



Ref.#AB86 



■ ■ ■ TM 

insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



8/8/77 



D 4004/40 D8008 08080 D8048 D8085 LI 3000 D Other. 



(use additional sheets if necessary) 



RECOVR 

The function is to find and recover to a diskette file data 
accidentally lost while using the ISIS text editors 



MDS 800 (32K RAM), Single density DOS, and CRT or TTY 



Standard ISIS I or ISIS II system diskette containing 
ISIS Text Editor V1.1 or V1.6 



Se page 2 of attached procedure. 



A file on the diskette containing the text editor input buffer 
contents or text buffer contents as selected. 



Registers Modified: 
AJJ 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 
Stack usage 6 Bytes 



Assembler/Compiler Used: 

ISIS 8080 Macro Assembler V1.0 



Programmer: 

Ross E. Morgan 



Company: 
Intel 



Corporation (ext. 2031) 



Address: 

2880 Northwestern Parkway 



City: 



Santa Clara 



State: 



California 95051 



Intel Corporation, 1976 
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Ref.#AB86 
HOW TO USE THE RECOVERY PROGRAM 

RECOVR is a program that wi I I find and recover to a diskette file data accidentally 
lost while using the ISIS TEXT EDITORS. ' 

The data can be lost in one of two places: 

1. If you thought you were doing an insert (I) and you get a message: 

" " ILLEGAL IN THIS CONTEXT 

then the data is lost in the input buffer. To recover this data use the "I" 
?c!c C ,, in ™ e . command +ail- "t doesn't make any difference whether ISIS-I or 
Iblb-li is being used, when data is lost in the input buffer. 

2. If you had data in the EDITOR and suddenly it is gone, or someone hits 

Ik L UP „ X °- Y ? U ! ry f ° 6Xi+ +he EDIT0R and Set an ERROR 7 (full diskette); 
then the data is lost in the text buffer. Whether ISIS-I or ISIS-I I is being 
used is important when recovering data from the text buffer. If ISIS-I I was 
?!'?| „ US f d f R ^ C0VR defaults to ISIS-I I text buffer and no switch is necessary. 
If ISIS-I is being used, then the "1" switch must be set. 



An ISIS-I based RECOVR can recover data from the ISIS-I I buffers and 



visa-versa. 



COMMAND SYNTAX: -RECOVRD f i lename [ D switch] 

"filename" is the name of a diskette file that is to contain the recovered data. 

[ ] means optional. Omitting this portion will default RECOVER to the ISIS-I I text 
buffer. 

"switch" is either the letter "I" for the Text Editor input buffer or the number "1" 
it ISIS-I was used when the data was lost. 

NOTE : 

When recovering data from the input buffer the first twelve characters of the file 
will be permanently lost. 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref.#AB87 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 □ 4040 D 8008 



8080 D 3000 



(use additional sheets if necessary) 



MSAVE/MLOAD utilities for MDS-800 with DOS. 



MSAVE saves a block of RAM memory into an ISIS file. 
ML0AD loads RAM memory with an ISIS file. 



MDS -800, DOS, 32K RAM memory 



MDS monitor V2.0, ISIS I or II 



MSAVE Filename ^ 

From? xxxxj s * 

To? yyyy^ 

ML0AD Filename ^ 



At? 



zzzz. 



MSAVE creates Filename with length yyyyH - xxxxH + 1 

MLOAD places in memory Filename at location zzzzH 

Li 



Registers Modified: 

ALL 



RAM Required: 
32K 



ROM Required: 



Maximum Subroutine Nesting Level: 

8/4 



Assembler/Compiler Used: 

ISIS II 8080/8085 Assembler VI. 



Programmer: (31?) 353 3249 

Carl Harcourt, B/834 



Company: 

NAVAL AVIONICS FACILITY, Indpls 



Address: 6000 East 21st Street 
Indianapolis, Indiana 46218 



98-034C 



8/8/77 
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Ref .#AB88 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/40 D8008 08080 D8048 D8085 D3000 D Other. 



(use additional sheets if necessary) 



DISPLAY 

A set of general purpose routines for using a Video-memory 
display device. 



A Video-memory type of CRT display controller attached to the 8080 
bus. The display should present one character for each byte of 
memory. It should display reverse video (black on white) for each 
character with bit 7 set. 



None. 



The variable CHR contains the character to be displayed by the routine 
DSWRT. All other routines require no parameters. The address and 
size of the video memory are Assembly-time variables. 



The video-memory will display the desired characters performing 
scrolling when necessary and allowing full cursor movement. 
The cursor is simulated by inverting bit 7 of certain memory locations 
to display reverse video. 



Registers Modified: 
All 



RAM Required: 

9 bvtes + stack + video memory 

ROM Required: 

170 (hfty) hy-rp<; 



Maximum Subroutine Nesting Level: 
5 



Assembler/Compiler Used: 

8080 Macro Assembler 

8/8/77 ''' ,n,el Corporation, 1976 



Programmer: 

Jeff Kravitz 



Company: 



Address: 

197 Fai rhaven Blvd. 



City: 



Woodbury 



State: 

New York 



11797 
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Ref.#AB89 



insite lNTEV USERS library submittal form 

D4004 D4040 D8008 518080 Q3000 D Other 



Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(use additional sheets if necessary) 



Program i 

Title Hazeltine 2000 CRT Function Driver 



Provides an interface for all ten special functions of the Hazeltine 
2000 CRT. See enclosed sheet for details. 



Hazeltine 2000 CRT 



None 



The user selects the following assembly parameters: 

(a.) Output port 

(b.) Register pair for (x,y) cursor addressing 

(c.) The user may choose to assemble out any of the first seven 

functions on the enclosed sheet via an EQU to reduce memory needs, 
(d.) Functions are invoked simply by CALL. The cursor addressing 

function expects a cursor position, (x,y), in the register pair 

selected in (b.) above. 



The given function is performed on the CRT. 



Reference: Hazeltine 2000 Operating Manual 
Hazeltine Corporation 
Greenlawn, N.Y. 11740 



Registers Modified: 



A only 



RAM Required: 



Zero (excluding stack) 



ROM Required: 



37 to 73 bytes 



Maximum Subroutine Nesting Level: 



One 



Assembler/Compiler Used: 
MAC 80 Vers 2.0, Xerox Sigma 9 



Programmer 



Dan Las ley 



Company: 



Memphis State University 



Address: 



Computer Services 



City: 



Memphis 



State: 



TN 38111 



R/fi/77 



© Intel Corporation. 1976 
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HAZELTINE 2000 CRT FUNCTION DRIVER 
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REF. NO. AB89 

PROGRAM TITLE -'HAZELTINE 2000 CRT FONT I ON DRIVER 



TITLE 



HAZELTINE 20OO CRT FUNCTION DRIVER 



0000 
0002 
0004 



FUNCTION DRIVER FOR HAZELTINE 2000 CRT 

WRITTEN BY DAN LASLEV 
COMPUTER SERV I CES 
MEMPHIS STATE UNIVERSITY 
MEMPHIS, TN 38152 

BEGIN INVARIANT DATA. . . 



.; BC REGISTER: 
i DE REGISTER: 
:. HL REGISTER: 



BPAIR 


EQU 





DPAIR 


EQU 


2 


HPAIR 


EQU 


4 



0000 



0004 



HAZEL 



REG 



BEGIN USER-SELECTABLE DATA: 
<A> SELECT CRT OUTPUT PORT. . 



EQU 



EQIJ 



y 



.: ARBITRARILY ZERO 



<.&> SELECT REGISTER PAIR AS INPUT TO THE "ADCUR" CADDR 
CURSOR > ROUTINE. 



HPAIR 



J ARBITRARILY "HL' 



<C> SELECTIVELY ENABLE THE FOLLOWING FUNCTIONS BY SETT 
GIVEN FLAG NON-ZERO: 



0001 

301 

■L.I001 
0001 
0001 



.; 




•::i> 




• ; 




<2> 




. ; 




<4> 
< 5 > 




.' 








ZXMIT 


EQU 




i 


ZDELN 


EQU 




i 


ZSBAC 


EQIJ 




i 


ZINLN 


EQU 




i 


ZCFOR 


EQU 




i 



ZXMIT" - TRANSMIT 

ZDELN" - DELETE LINE 

ZINLN" - INSERT LINE 

ZSBAC" - SET BACKGROUND 

ZCFOR" - CLEAR FOREGROUND 

ZSFOR" - SET FOREGROUND 

ZPRIN" - PRINT 

.; INCLUDE ALL FUNCTIONS BY DE 
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0001 
0001 



ZSFOR 
ZPRIN 



EQU 
EQU 



1 
1 



1000 



1000 



HERE 



SELECT A START ADDRESS FOR THE CODE. 

EQU 1000H i PUT IT ANV OLD WHERE 

BEGIN CODE. . . 



ORG 



HERE 



1000 3E0E 
302 C32A10 



.; *************************************************************** 

.; * TRANSMIT FUNCTION. . . . 

; *************************************************************** 

IF ZXMIT i MAV BE SKIPPED... 

XMIT: MVI A, 14 ■■ 14 IS CONTROL-N 

JMP DAR 
END IF 



; "DUMP AND RETURN" 



; ************************************************************* 
s* DELETE LINE FUNCTION... 

; *************************************************************** 



1005 3E13 
100? C33310 



DELN : 



IF 


ZDEL 


MVI 


A, 19 


JMP 


DAW 


END IF 





CONTROL-S 
"DUMP AND WAIT" 



'; *************************************************************** 

j* SET BACKGROUND FUNCTION. . . . 

; *************************************************************** 



100A 3E19 
100C C32A10 



F.BACK 



IF 


ZSBAC 


MVI 


ft, 25 


■JMP 


DAR 


END IF 





; CONTROL-V 



.; *************************************************************** 

; * INSERT LINE FUNCTION. . . . 

j*************************************************************** 
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100F 3E1A 
1011 C33310 



INLN: 



IF 


2 INLN 


MVI 


A, 26 


JMP 


DAW 


END IF 





i C0NTR0L-2 



'* CLEAR FOREGROUND FUNCTION... 
J******************************^ 







IF 


2CFOR 


1014 3E1D 


CFORE : 


MVI 


A, 29 


1016 C33310 




JMP 
END IF 


DAW 



XiNTROL-SHIFT-M 



'* SET FOREGROUND FUNCTION. . . . 
J*****************************^^ 



1019 3E1F 
101B C32A10 



5FORE : 



IF 


2SF0R 


MVI 


A, 31 


JMP 


DAR 


END IF 





i CONTRQL-SHIFT-0 



i * PRINT FUNCTION. . . . 



101E 3E1E 
1020 C32A10 



PRINT: 



IF 


ZPRIN 


MVI 


A, 30 


JMP 


DAR 


END IF 





CONTROL-SHIFT-N 



i *************************************************************** 
•> * CLEAR SCREEN FUNCTION. . . . 

; *****************************************#***********^ ++ ^^ +H , 



j.025 C33310 



CLEAR : 



MVI 
JMP 



A, 28 
DAW 



i CONTROL-SHTFT-L 
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1028 3E12 
102A F5 
102B 3E7E 
102D D300 
102F Fl 
1030 D300 
1032 €3 



; *************************************************************** 

i* HOME CURSOR FUNCTION. . . . 

] * FALL INTO "DAR". 

j *************************************************************** 

HOME' MVI A, 18 i CONTROL-R 

DAR PH'-H P<^W 'SAVE CURRENT FUNCTION 

MVI A. 126 ; DUMP LEAD-IN CCONTROL-sHIFT 

OUT HAZEL :■ PERIOD) TO CRT. 

POP PSW .; RESTORE FUNCTION 

OUT HAZEL - ; PERFORM FUNCTION AND RETURN 

PE T " .; CALLER WITHOUT DELAY. 



■ *************************************************************** 

;* "DUMP AND WAIT" ROUTINE. 

i *************************************************************** 



1033 CD2A10 
1036 3E7F 
1038 D30O 
33A D30O 
103C C9 



DAW : 



103D 3E11 
103F CD2A10 

1042 7C 

1043 D30O 

1045 7D 

1046 D300 
1048 CS 

0000 



CALL 


DAR 


MVI 


A. 127 


OUT 


HAZEL 


OUT 


HAZEL 


RET 





OUTPUT LEAD-IN AND FUNCTION 
CERTAIN FUNCTIONS REQUIRE 
MORE DELAV CHARACTERS AT 
BAUD RATES <. >= 1200 BAUD 



******************** 



****************************************** 

ADDRE'-.'- CURSOR FUNCTION. LEFT REGISTER OF REGISTER PMl 
CONTAIN'-. THE X < COLUMN > COORDINATE. RIGHT REGISTER UON 
j HE y cpriWJ COORDINATE. NOTE THAT USER MAV SELECT ANV 
PAIRS BC, DE.. OR HL VIA ASSEMBLY PARAMETERS. 

************************************************************** 



ADCUR 



MVI 


A.. 17 


CALL 


DAR 


MOV 


A.. REG 


OUT 


HAZEL 


MOV 


A, REG+1 


OUT 


HAZEL 


RET 




END 





.; CONTROL-Q 

; OUTPUT LEAD-IN AND CONTROL- 

.: MOVE X COORDINATE 

.; TO OUTPUT PORT. 

i MOVE V COORDINATE 

; TO OUTPUT PORT. 
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Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D4004 D4040 D8008 B8080 D3000 D Other. 



(use additional sheets if necessary) 



Intel Format Hex Data File Load/Read 

Loads Hex files from paper tape, etc., into memory. 



8080 System. Paper Tape Reader. 



None 



Status bit for read data available is expected on Port 2 bit 7 
Data is read and echoed on Port 3. * 



Data read is converted to binary and placed in memory beginning at 
address specified in beginning of record. 



Registers Modified: 
AjB.DjH.L.'M' 



RAM Required: 
144 Bytes 



ROM Required: 
None 



Maximum Subroutine Nesting Level: 
2 



Assembler/Compiler Used: 

ISIS 8Q8Q Macro Assembler 



Programmer: 

Gary Tock/Doug AamniH 



Company: 

Micro Control Company 



Address 

7956 Main Street. North East 



City: 
Minneapol is 



State: 
Minnesota 55432 



8/8/77 © Intel Corporation, 1976 
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.; REF. HO. AB90 

J PROGRAM TITLE INTEL FORMAT HEX DATA FILE LOAD/READ 



0000 



URG 



0000H 



.'THIS IS A PROGRAM FOR READING INDUSTRY STANDARD 
.:<INTEL> FORMAT HEX DATA 

i THE -READ DATA AVAILABLE' SIGNAL IS EXPECTED 
;0N PORT 2 BIT 7. THE ASCII DATA IS EXPECTED 
.; ON PORT 3. THE DATA READ IS ALSO ECHOED ON 
.; PORT 3. 



0000 


CD4200 


L00P1 : 


CALL 


INCH 


0003 


FE3A 




CPI 




0005 


C20000 




JNZ 


L00P1 


0008 


CD2800 




CALL 


GETBT 


000B 


B7 




ORA 


A 


000C 


CA2700 




JZ 


EOF 


000F 


47 




MOV 


B, A 


0010 


CD2800 




CALL 


GETBT 


0013 


67 




MOV 


H, A 


0014 


CD2800 




CALL 


GETBT 


0017 


6F 




MOV 


L, A 


0018 


CD28O0 




CALL 


GETBT 


001B 


CD2800 


L00P2 : 


CALL 


GETBT 


001E 


77 




MOV 


M, A 


001F 


23 




I NX 


H 


0020 


05 




DCR 


B 


0021 


C21B00 




JNZ 


L00P2 


0024 


C30000 




JMP 


L00P1 


0027 


76 


EOF : 


HLT 




0028 


CD3500 


GETBT : 


CALL 


INDIG 


002B 


87 




ADD 


A 


0O2C 


87 




ADD 


A 


S02D 


87 




ADD 


A 


002E 


87 




ADD 


A 


32F 


57 




MOV 


D, A 


nJ030 


CD3500 




CALL 


INDIG 


0033 


B2 




ORA 


D 


0034 


C9 




RET 





J GET AND ASCII CHAR. W/0 PARITY 

i BEGINNING OF RECORD INDICATOR? 

.; KEEP LOOKING IF NOT 

:■ GET A BINARY BYTE 

i LENGTH FOR THE RECORD. 

; IF ZERO. WE -RE DONE. 
i END OF FILE. HALT. 

> SAVE LENGTH INDICATOR. 

i GET 1ST ADDRESS FOR RECORD. 
.'MOST SIGNIFICANT BYTE 

i LEAST SIGNIFICANT BYTE 

i SKIP RECORD TYPE INDICATOR. 

i GET A BINARY BYTE OF DATA 

i STORE IN MEMORY. 

i NEXT ADDRESS. 

.; DECREMENT LENGTH INDICATOR. 

; MORE BYTE THIS RECORD? 

;GET NEXT RECORD. 

; END OF FILE STOP 

> GET A NUMBER 
.;MOVE LOW 4 BITS 
J TO HIGH 4 BITS 



.: SAVE RESULT. 

; GET ANOTHER NUMBER 

i -ADD IN-' TO FORM BINARY BYTE 
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0035 


CD4200 


INDIG: 


CALL 


INCH 


0028 


FE3A 




CPI 


- 9 .- +1 


003A 


FA3F00 




JM 


IND1 


003D 


C603 




AD I 


y 


003F 


E60F 


IND1: 


AN I 


0FH 


0041 


C9 




RET 




0042 


DB02 


INCH: 


IN 


2 


9044 


E680 




AN I 


80H 


0046 


CA4200 




JZ 


INCH 


0049 


DB03 




IN 


3 


004B 


D30.i 




OUT 


3 


004D 


E67F 




AN I 


7FH 


004F 


C9 




RET 




0000 




END 







.; GET A CHARACTER < NUMBER X 

.; 0-9 ? 

; STRIP OFF UPPER BITS. 

; STRIP OFF UPPER 4 BITS. 

GET STATUS. 

READ DATA AVAILABLE ? 

KEEP LOOKING IF NOT READY? 

GET A CHARACTER. 

ECHO CHAR. TO PRINT DEVICE 

STRIP OFF PARITY 
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insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/40 D8008 S8080 D8048 D8085 D3000 DOthe 



(use additional sheets if necessary) 



"DATC0N.B1" Analog to Digital Conversion Program 

The A/D Conversion Program represents the minimum software of Burr Brown's 
MP 8416 analog I/O system. It works in dialogue mode. The data conversion 
process begins after selection of the desired range. Each voltage data is 
represented by a 12 bit two's complement binary number. 
The program converts this binary number in a real decimal number and 
outputs one value per line with sign and voltage specification. After 
acquisition of ten measurements the program ends or continues depending on 
user's input. During console input incorrect numbers are recognized and 
an error is announced. After input of "DATC0N.B1" and carriage return the 
program starts under ISIS control. 



TTY, MDS 800, Floppy Disc, Analog 1/0 System MP8416 (Burr Brown) 



MDS 800 software and ISIS software (16K version is sufficient) 



The only necessary input parameters are the four numbers "1,2,3,4" and 
the two characters "Y and N" 



Output results are the commentary of the dialogue program and the 
converted voltage data. 



Registers Modified: 
./. 



RAM Required: 
850 bytes 



ROM Required: 
./. 



Maximum Subroutine Nesting Level: 
3 



Assembler/Compiler Used: 
ISIS 808Q Assembler (16K version) 



Programmer: 
Helmut Klie 



Company fiiomed. Tech ni k, Med izin ische 
Hochschule Hannover 



Address: 

Nobel ring 25 



City: 

3000 Hannover 61 



State: 

Federal Republic of Germany 
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Ref.#AB93 



insite mjEV USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



8/8/77 



D 4004/40 D8008 ££8080 D8048 D8085 D3000 D Other. 



(use additional sheets if necessary) 



FAST' 



This program wi II reset the CRT USART to operate at four 
times the normal baud rate. This is done by using the 
divide by 4 rate instead of the divide by 16 which the 
monitor uses. 



MDS with 16K, Disk, CRT on ports 246 and 247 

MDS monitor, ISIS 

No input parameters. Called from ISIS 
Eg.: -FAST 



A message will appear asking you to change the CRT Baud 
rate and type any character. At program completion, control 
is returned to ISIS. 



Registers Modified: 
N/A 



RAM Required: 

108 BYTES 



ROM Required: 

NONE 



Maximum Subroutine Nesting Level: 
1 cal I 



Assembler/Compiler Used: 

MDS Macro Assembler 



Programmer: 

Gerry de Koning 



Company: 

Toronto Transit Commission 



Address: 

1900 Yonge Street 



City: 



Toronto 



State. 

Ontario M4S 1Z2 



Intel Corporation, 1976 
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; REF. NO. AB93 
PROGRAM TITLE FAST 



PROGRAM : FAST 



PROGRAMMER 



ENVIRONMENT: 



DESCRIPTION: 



GERRV DE KONING 

C. I. S. PROJECT 

TORONTO TRANSIT COMMISSION 



HHRDWARE: INTELLEC MDS WITH CRT CONSOLE A 

DISK SYSTEM. 
bOFTWARE: MDS MONITOR V2. 9 

ISIS VI. 2 



THIS PROGRAM WILL SWITCH THE MDS INTERFACE 
TO FOUR TIMES THE DEFAULT SPEED. A MESS AG 
THE USER TO SWITCH TO CRT TO THE FAST BAUD 
AFTER THIb IS DONE, THE USER ENTERS A CHAR 
ON THE CONSOLE INPUT DEVICE. THE PROGRAM W 
RETURN TO ISIS. 
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00F7 
00F6 

0040 

F809 
F803 



; EQUATES 




CRTCONTROL EQU 


0F7H 


CRTDATA EQU 


8F6H 


ISIS EQU 


40H 


CO EQU 


0F809H 


CI EQU 


0F803H 



MAIN PROGRAM 



3300 




ORG 


3300H 


3300 0628 


FAST : 


MVI 


B, MSGLEN 


3302 213F33 




LXI 


H.. MSG 


3305 4E 


FAST© : 


MOV 


CM 


3306 CD09F8 




CALL 


CO 


3309 23 




I NX 


H 


330A 05 




DCR 


B 


30B C20533 




JNZ 


FASTO 


330E 21FFFF 


DELAV : 


LXI 


H, 8FFFFH 


3311 110100 




LXI 


D, 1 


3314 2B 


DLV0 : 


DCX 


H 


3315 19 




DAD 


D 


3316 2B 




DCX 


H 


3317 D21433 




•JNC 


DLV0 


331A F3 




DI 




331B AF 




XRA 


A 


331C D3F7 




OUT 


CRTCONTROL 


331E D3F7 




OUT 


CRTCONTROL 


3320 D3F7 




OUT 


CRTCONTROL 


3322 3E40 




MVI 


A, 48H 


3324 D3F7 




OUT 


CRTCONTROL 


3326 3E4E 




MVI 


A, 4EH 



.; OUTPUT MESSAGE 



3328 D3F7 
332A 3E37 

332C D3F7 

32E FB 
^32F DBF6 

3331 CD83F8 



OUT 
MVI 

OUT 
EI 

IN 

CALL 



CRTCONTROL 
A, 37H 

CRTCONTROL 
CRTDATA 

CI 



DELAV SO THAT LF CAN PRINT 



.: CLEAR CRT USART 



i RESET USART 

.; USART MODE : 

.: ASVNC +16 

.; 8 BITS 

.; NO PAR I TV 

.; ONE STOP BIT 

:. USART COMMAND : 

.; RTS, ERROR RESET, R+EN, DTR, 



READ TO CLEAR DATA 

WAIT TILL CHARACTER HIT. 
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S2S4 0E99 MVI C, 9 ; EXIT TO ISIS 

.i-^b 1137^ LXI D, $+1 

3333 CO4800 CALL ISIS 

333C C30880 JMP 8 ; ISIS RESTART IF UNSUCCESSFUL EX 

f : ?1 : ! ^3455420 MSG: DB 'SET CRT RATE TO FAST AND HIT CHARACTER M3, 10 

SS4S 4^525420 

3347 52415445 

334B 20544F20 

334F 46415354 

3353 20414E44 

3357 20484954 

335B 28434841 

335F 52414354 

3363 45520D8A 

0028 MSQLEN EQU *-MSG 

3300 END FAST 
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Ref.#AB93A 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



8/8/77 



□ 4004/40 D8008 1x18080 D8048 D8085 D3000 D Other. 



(use additional sheets if necessary) 



SLOW 

SLOW is the undoing of FAST. If the CRT baud rate has 

been changed, SLOW will restore the CRT USART to its default 

speed. 



MDS with 16K, Disk, CRT on ports 246 and 247 

MDS Monitor, ISIS 

No input parameters; called from ISIS 
Eg. : -SLOW 



A message wtl I appear asking you to change the CRT baud 
rate and type any character. At program completion, 
control is returned to ISIS. 



Registers Modified: 

U/A 



RAM Required: 
108 BYTFS 



ROM Required: 
NONF 



Maximum Subroutine Nesting Level: 
1 cal I 



Assembler/Compiler Used: 

M DS Macro Assembler 



Programmer: 
Gerry de Koning 



Company: 

Toronto Transit nnmmrgcinn 



Address: 



1900 Ynngft Str-gof 



City: 
Toronto 



State: 

Ontario M4S 1Z2 



Intel Corporation. 1976 
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i REF. NO. AB93A 
PROGRAM TITLE SLOW 



PROGRAM : SLOW 



PROGRAMMER : 



ENVIRONMENT: 



DESCRIPTION: 



GERRV DE KGNING 

C. IS. PROJECT 

TORONTO TRANSIT COMMISSION 



HARDWARE: INTELLEC MDS WITH CRT CONSOLE A 

DISK SVSTEM. 
SOFTWARE: MDS MONITOR V2. 6 

ISIS VI. 2 



THIS PROGRAM WILL SWITCH THE MDS INTERFACE 
TO THE DEFAULT BAUD RATE. A MESSAGE WILL 
USER TO SET THE CRT TO THE SLOW BAUD PATE 
THIS IS DONE, THE USER ENTERS A CHARACTER 
CONSOLE INPUT DEVICE, AND THE PROGRAM PETU 
ISIS. 
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VI. 



PRGE 2 





; EQUATES 




00F7 


CRTCONTROL EQU 


0F7H 


00F6 


CRTDflTR EQU 


0F6H 


0040 


ISIS EQU 


40H 


F802 


CI EQU 


0F803H 


F809 


CO EQU 


0F809H 



MAIN PROGRAM 



2200 




ORG 


2200H 


2200 0628 


SLOW: 


MVI 


6, MSGLEN 


2302 212F32 




LXI 


H, MSG 


2205 4E 


SLOWO : 


MOV 


CM 


2206 CD09F8 




CALL 


CO 


2209 22 




I NX 


H 


320A 05 




DCR 


B 


20B C20522 




JNZ 


SLOW0 


220E 21FFFF 


DELAV : 


LXI 


H, 0FFFFH 


2211 110100 




LXI 


D, 1 


2214 2B 


DLV0: 


DCX 


H 


2215 19 




DAD 


D 


2216 2B 




DCX 


H 


2217 D21422 




JNC 


DLVO 


221A F2 


.• 


DI 




221B AF 




XRA 


A 


221C D2F7 




OUT 


CRTCONTROL 


221E D2F7 




OUT 


CRTCONTROL 


2220 D2F7 




OUT 


CRTCONTROL 


2222 2E40 




MVI 


A, 40H 


2224 D2F7 




OUT 


CRTCONTROL 


2226 2E4F 




MVI 


A, 4FH 



2228 D2F7 
222A 2E27 

222C D2F7 

32E FB 
j:22F DBF6 

2221 CD02F8 



OUT 
MVI 

OUT 

EI 

IN 

CALL 



i OUTPUT MESSAGE 



CRTCONTROL 
A, 27H 

CRTCONTROL 

CRTDATA 

CI 



; DELAY SO THAT LF CAN PRINT 



i CLEAR CRT USART 



; RESET USART 

; USART MODE: 

; ASVNC *64 

i 8 BITS 

; NO PARITY 

; ONE STOP BIT 

i USART COMMAND : 

; RTS, ERROR RESET, R*EN, DTR, 



i READ TO CLEAR DATA 

j WAIT TILL CHARACTER ENTERED. 
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PAGE 2 



3334 0E09 


MVI 


C, 9 


3336 113733 


LXI 


D, $+ 


3339 CD4000 


CALL 


ISIS 


333C C30800 


JMP 


8 



333F 53455428 MSG: DB 

3343 43525420 

3347 52415445 

334B 20544F20 

334F 534C4F57 

3353 20414E44 

3257 20484954 

335B 20434841 

335F 52414354 

3363 45520D0A 

0028 MSGLEN EQU 

3300 END 



;EXIT TO ISIS 

} ISIS RESTART IF UNSUCCESSFUL EX 
'SET CRT RATE TO SLOW AND HIT CHARACTERS 13, 10 



S-MSG 
SLOW 
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Ref.#AB94 



insite INTEL * USER S library submittal form 



D4004 D4040 D8008 ^,8080 D3000 DOther. 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



5 LEVEL (BARDOT) TO 8 LEVEL (ASCII) PAPER TAPE CONVERSION 

CONVERTS 5 LEVEL BARDOT PAPER TAPES FROM TELEX, TWX OR 
AMATEUR RTTY TO ASCII. ' 



INTELLEC 8/MOD 80 WITH ASR 33 TTY ON PORTS .0 AND 1 



SYSTEM MONITOR VERSION 3.0 



BARDOT TAPE IS PLACED IN TTY READER AS SHOWN BELOW 
READER = 1 IS ASSIGNED WITH SYSTEM MONITOR. 




WHEN READER INPUT ROUTINE IS CALLED THE PROPER ASCII 
CHARACTER IS RETURNED IN THE ACCUMULATOR. 



Registers Modified: 



A,F (HL RESTORED) 



RAM Required: 



ROM Required: 



90 HEX BYTES 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



version 3.0 



Programmer: 



MARK D. HANSEN 



Company: 



INSTRUMENTATION SPECIALTIES 



Address: 



P.O. BOX 5347 



City: 



LINCOLN, NEBRASKA 68505 



State: 



8/8/77 



© Intel Corporation, 1976 



98 034C 

4-450 
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REF. NO. AB94 

PROGRAM TITLE 5 LEVEL <BARDOT> TO 8 LEVEL (ASCII) PAPER TAPE CO 



5 TO 8 LEVEL PAPER TAPE CONVERSION PROGRAM 

MARK D. HANSEN 5/28/77 

REQUIRES INTELLEC 8/MOD 80 
SVSTEM MONITOR VERSION 2. 

PLACE 5 LEVEL <BARDOT> TAPE IN ASR 33 
READER WITH THE TAPE COVERING THE LEFT 
5 READER PINS. 

READER ASSIGNMENT = 1 FOR CHARACTERS 

= 2 FOR FIGURES 



USE MONITOR COMMAND 
BARDOT MODE 



"AR=1" TO CHANGE TO 



READER JUMP VECTORS ARE AT 
AND 3709H <R=2> 



S706H <R=1) 



2706 


ORG 2706H 


2706 C21B27 


JMP LTRIN 


2709 C22427 


JMP FIGIN 


271B 


ORG 371BH 




LTRIN: 


271B CD6127 


CALL FAKE 


271E D8 


RC - f 


271F E61F 


AN I 00011111B ; 


2721 FE1B 


CPI FIGS ; 


2722 CA4B27 


JZ FLIP i 


2726 FE1F 


CPI LTRS ; 


2728 CA1B27 


JZ LTRIN i 


272B E5 


PUSH H 


272C 216527 


LXI H, TABLTR ; 




FIN: 


272F 85 


ADD L ; 


2720 6F 


MOV L, A j 


^21 7E 


MOV A, M } 


^722 El 


POP H i 


2732 C9 


RET 



TTV READER IN 

RETURN IF NO TAPE 

MASK OFF LOWER 5 BITS 

COMPARE WITH FIGURES CHARACTER 

IF FIGURES CHANGE TO READER=2 

IF LETTERS CHARACTER 

IGNORE AND GET ANOTHER CHARACTER 

POINT TO START OF CONVERSION TABLE 

ADD INPUT CHARACTER TO POINT TO 
PROPER TABLE ENTRV 
GET PROPER ASCII CHARACTER 
RESTORE H&L REGISTERS 
i RETURN WITH PROPER ASCII CHARACTER IN A 



FIGIN: 
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ISIS 8680 MACRO ASSEMBLER, VI. 



PfiGE 2 



3734 
3737 
3738 
373R 
373C 
373F 
3741 
3744 
3745 
3748 



CD6137 

D8 

E61F 

FE1F 

CR5637 

FE1B 

CA3437 

E5 

218537 

C32F37 



CALL FAKE 

RC 

AN I 00011111B 

CPI LTRS 

JZ FLOP 

CPI FIGS 

JZ FIQIN 

PUSH H 

LXI H, TABFIG 

JMP FIN 



GET READER INPUT ROM TTV 
RETURN IF NO TAPE LEFT 
MASK OFF LOWER 5 BITS 
COMPARE WITH LETTERS CODE AND 
SWITCH TO LETTERS MODE <R=1> 
IF FIGURES CHARACTER IGNORE 
AND GET ANOTHER 

; POINT TO FIGURES TABLE 
j GO FINISH LIKE LETTERS 



374B 3A03O0 
374E F604 
3750 320300 
3753 C33437 



FLIP: 
LDA 3 

OR I 0000O100B 
STA 3 
JMP FIGIN 



SWITCH FROM LETTERS TO FIGURES MODE 
.; iv CHANGING THE I/O STATUS BVTE 
.; FROM READER=1 TO READER=2 



3756 3A030© 
3759 E6FB 

75B 320300 
375E C31B37 



FLOP: 
LDA 3 

AN I 11111011B 
STA 3 
JMP LTRIN 



SWITCH FROM FIGURES TO LETTERS MODE 
BV CHANGING THE I/O STATUS BVTE 
FROM READER=2 TO READER=1 



3761 E5 



3762 C3AF3E 



FAKE : 
PUSH H 



JMP 3EAFH 



;PUSH DOWN ONE LEVEL OF STACK TO 

j COMPENSATE FOR POP AT END 

j OF TTV MONITOR ROUTINE 

i TTV READER ROUTINE IN MONITOR 



LETTERS MODE LOOKUP TABLE 



3765 00 

3766 54 

3767 OD 

3768 4F 

3769 20 
376A 48 
376B 4E 
376C 4D 
376D 0A 
376E 4C 
376F 52 

3770 47 

3771 49 
772 50 

^773 43 

3774 56 

3775 45 

3776 5A 



TABLTR : 
DB 
DB 54H 
DB ODH 
DB 4FH 
DB 20H 
DB 48H 
DB 4EH 
DB 4DH 
DB ©AH 
DB 4CH 
DB 52H 
DB 47H 
DB 49H 
DB 50H 
DB 43H 
DB 56H 
DB 45H 
DB 5AH 



BLANK 
T 

CR 


SPACE 
H 
N 
M 

LF 
L 
R 
G 
I 
P 
C 
V 
E 
;Z 
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3777 44 


DB 


44H 


; D 




3778 42 


DB 


42H 


;B 




3779 53 


DB 


53H 


. .- 




377R 59 


DB 


59H 


.: V 




377B 46 


DB 


46H 


jF 




377C 58 


DB 


58H 


;X 




377D 41 


DB 


41H 


.; A 




377E 57 


DB 


57H 


; W 




377F 4fl 


DB 


4AH 


■ J 




3788 00 


DB 


00H 


; FIGS 




3781 55 


DB 


55H 


.; U 




3782 51 


DB 


51H 


> Q 




3783 4B 


DB 


4BH 


; K 




3784 00 


DB 


80H 


i LTRS 






> 




FIGURES MODE LOOKUP 




TABFIG: 






3785 00 


DB 


00H 


i BLANK 




3786 35 


DB 


35H 


.: 5 




?&? 0D 


DB 


8DH 


.: CR 




3788 39 


DB 


39H 


i 9 




3789 20 


DB 


28H 


; SPACE 




378 A 23 


DB 


23H 


.: # 




— ^ f' fc«E» ii!L- 


DB 


2CH 


; _, 




378C 2E 


DB 


2EH 


} . 




378D 0A 


DB 


8AH 


;LF 




378E 29 


DB 


29H 


.: :> 




378F 34 


DB 


34H 


i 4 




3790 26 


DB 


26H 


i & 




3791 38 


DB 


38H 


.' y 




S i"* S*ii' j£0 


DB 


38H 


; 8 




3793 3A 


DB 


3AH 


; ; 




3794 3B 


DB 


3BH 


; ; 




3795 33 


DB 


33H 


j -• 




3796 22 


DB 


22H 


II 




3797 24 


DB 


24H 


i * 




3798 3F 


DB 


3FH 


; ■-■ 




3799 87 


DB 


87H 


i BELL 




379A 36 


DB 


36H 


.; 6 




379B 21 


DB 


21H 


; 1 




379C 2F 


DB 


2FH 


; /' 




379D 2D 


DB 


2DH 


■ — 




379E 32 


DB 


32H 


:■ 2 




379F 27 


DB 


27H 


; ■'' 




^AO 00 


DB 


80H 


i FIG 




->Pfll 37 


DB 


37H 


■•y 




37A2 31 


DB 


31H 


i 1 




37A3 28 


DB 


28H 


; \', 




37A4 88 


DB 


08H 


:■ LTRS 





TABLE 
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ISI: 



i& MACRO ASSEMBLER, VI 9 PAGE 4 



00 IB FIGS EQU 099 11 61 IB 

001F LTRS EQU 00011111B 

0000 END 
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Ref.#AA15 



insite INTEL: USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 

Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 CX8008 D8080 D8048 D8085 



SDK-80 or 

'Other SBC 80/10 (use additional sheets if necessary) 



Sample Automatic Test Equipment Program 



Test program for a single board m 
Test Equipment to test digital ci 
When more memory is available the 
panded to test circuits up to 156 
an MDS microcomputer system with 
the test data for large circuits 
(For more information refer to at 

TTY or CRT, special ATE interface 
than $2.00 per I/O line. This in 
the unused space of the SDK-80 si 
I/O. 

SKD-80 or SBC 80/10 monitor. 



icrocomputer-based Automatic 
rcuits up to 24 I/O lines, 
system can easily be ex- 
1/0 lines. In that case, 
diskett is advisable. Then 
can be stored on a diskett. 
tached thesis) . 

circuitary which costs less 
terface can be mounted on 
ngle board for 24 lines of 



1. Tests to be applied to the circuit under test written in 
a special format. This data can be stored into the RAM via 
keyboard or can be stored on a ROM for the circuits more fre- 
quently tested. A high level language program is in progress 
to provide the test data in the required format 

2. Commands to the test program (test data address and repe- 
tition paramter) . For more information refer to Chap IV of 
my thesis (ATE user's instructions). ' 

Test results will be written on console. If only the detec- 
tion of faults requested the output message will indicate 
whether the circuit is all right or faulty (4000 tests/sec 
less memory requirement for test data). If the location of 
the fault is then appropriate, diagnostic messages will be 
written on console 

Ideal to test SSI, MSI integrated circuits. Can be used to 
test IC's in digital labs and for educational purposes. 
Single board ATE can be constructed with approximate hardware 



Registers Modified: 



ALL 



RAM Required: 



129 bytes minimum 



ROM Required: 



Maximum Subroutine Nesting Level 



IK bytes, C2708 or . . 
equivl . 



Assembler/Compiler Used: 



None 



Programmer: 



Hamid T. Hashemi 



Company: 



Computer Science Dept . 



Address: 



SUNY at Potsdam, N.Y, 



City: 



Potsdam, 



State: 



New York 13676 



© Intel Corporation, 1976 



98-034D 

4-456 



insite 



Ref.#AB95 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/40 D8008 ©8080 D8048 D8085 D3000 OOtherf 



Jluse additional sheets if necessary) 



SBC COMMUNICATOR 

This routine runs in an Intel SBC 80/10(20) and provides the ability 
to load and execute programs from 1) the terminal (TTY) connected to 
the 80/10 board USART or 2) from any host CPU connected to the USART 
on an Intel SBC 104 board. It also allows the microcomputer board(s) 
to become transparent so that regular terminal communication with the 
host CPU is possible. 



Intel SBC 80/10 and SBC 104 
8251 



8251 



I TTY I < 2D_§QZJQ > , 80/10 , ^oq.JO^ , hos+ , 



None if program is allowed to reside at location 00H 
SBC 80P MONITOR is useful. 



Right bracket followed by L indicates load stream cominq 
(ASCII 5DH) M 

Right bracket followed by S indicates start address coming 
any other characters get passed directly to the other serial 
stream (from TTY to host or from host to TTY) 



Host communication or 

loaded file in the SBC memory or 

started S6C program. 



Registers Modified: 
ALL 



RAM Required: 

2 loc. + stack 



ROM Required: 

18BH locations + SBC Monitor if 



Maximum Subroutine Nesting Level: 

? 



_LLS££ 



Assembler/Compiler Used: 

PDP11 Cross Assembler 



Programmer: 
Rex Tracy 



Company: 

Colorado State University 



Address: 

E_Lec 



City: 

Ft. Col I ins 



Engr. ftept. - HSU 



State: 

Colorado 80523 



Intel Corporation. 1976 



98 034 D 

4-458 



Ref.#AB96 



insite 



INTEL USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 

Software 



Input 
Parameters 



Output 
Results 



□ 4004/40 D8008 ©8080 D8048 □ 8085 D 3000 □ Other. 



(use additional sheets if necessary) 



IBM SELECTRIC INPUT PROGRAM 



THE PROGRAM ENABLES SELECTRIC TO BE USED AS AN INPUT DEVICE 
AND OPTIONALLY PRINT ON TELETYPE 



INTELLEC 8/MOD 80 SYSTEM, IBM SELECTRIC 735, SELECTRIC INPUT 
INTERFACE AS PER ATTACHED CIRCUIT DIAGRAM, TELETYPE ON PORT 
AND 1 WITH TAPE PUNCH IF DESIRED. 



8080 MONITOR VER. 1.0 



SELECTRIC INPUT DATA READ FROM PORTS 20H AND 21H INTO ACCUMULATOR 



CONVERTED ASCII CHARACTER IN REGISTER C AND PRINTED/PUNCHED ON TTY. 



Registers Modified: 

A, B, C, H & L 


Programmer: 

D. M. VAIDYA 


RAM Required: 

NONE 


Company: 

WESTFIELD COLLEGE 


ROM Required: 
328 BYTES 


Address: 

KIDDERPORE AVENUE 


Maximum Subroutine Nesting Levek 


City: 

LONDON, NW3 7ST 


Assembler/Compiler Used: 

CROSS ASSEMBLER 


State: 

ENGLAND 



Intel Corporation, 1976 



98 034 D 

4-460 



insite 



Ref.#AB98 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



D 4004/4040 D8008 $8080 D8048 D8085 D Other. 



Program 
Title 

Function 



(use additional sheets if necessary) 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



INSERT TAB CHARACTERS FOR SPACES 



A tab (CTRL-I) is substituted for each group of 8 spaces or less. 
Single spaces are left as they are. 



Intel lee MDS and appropriate input and output deyices. 



ISIS diskette Operating system 



Provide input file and output file when program is called. 

ie: SPTAB File 1 to Fi le 2 
File 1 and File 2 can be any legal file (:TR:, :CI:, :F1:PCM, SRC, etc) 



Only single spaces are left in the output file; all other groups 
of spaces are changed to an appropriate number of TAB characters. 



Registers Modified: 



RAM Required: 

64K (less with smaller buffers) 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

PLM80 V3.0 



Programmer: 
John Goode 



Company: 

Dow Chemical USA 



Address: 

P.O. Drawer K Bldq. B-1219 



City: 

Freeport 



State: 

Texas 77541 



© Intel Corporation, 1976 



98-0341X 

4-462 



Ref.#AB99 



insitg INTEL ° users library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D40C4 D4040 n8008 08080 D3000 D Other. 



(use additional sheets if necessary) 



PROM PROGRAMMER FOR SDK 



Programmes 27o8 EPROM with data from RAM/ROM area on SDK board. 

Number of progamming pulses is set to 5 times needed number of 

pulses to change the data in all addresses. PduIs 1 ms with one 

wait state. 

INTEL MCS-80 SDK, ASR-3 TTY 

Interface circuit for EPROM, see diagram. 

SDK MONITOR PROM 

Start address, end address (RAM/ROM area), start address in EPROM. 

Instructions: 1) Urite data into RAM area (I command) or place 
ROM to be duplicated into normal ROM socket on 
SDK board. 

2) Type: G12oo (CR) 

Output: MON PROM SEE PROC <\DRS C/fl: 

3) 261/ and PP'JR off , place EPROM into socket, PPIJR on, 
Type addresses: xxxx,yyyy,zzzz (CR) 

Output: ALL ONE (EPROM erased in area) 
261/ ON C/R 

4) 26V on , type: (CR) 

Wait for programming min 5 sec max 256 sec 
Output: XX (number (HEX) of used progamming 
pulses) 
MON PROM SEE PROC ADRS C/R: 

cont. next page. 



Registers Modified: 



All 



RAM Required: 



379 byte 



ROM Required: 



SDK MONITOR PROM 



Maximum Subroutine Nesting Level: 
NA 



Assembler/Compiler Used: 

ISIS II BoBo/8o85 ASSM., VI. o 



Programmer: 



Heloe Lassen 



Company: 
Soenderborq tskniske skole 



Address: 



Skovve i 26 



City: 



State: 



Soenderborq 



Denmark 



Q Intel Corporation, 1976 



4-464 



page 1 



5) Repeat from step 3 (with new addresses or EPROM) 
or return to monior type: not hex char. 

CAUTION: It is only allowed to shift EPROM with kit RESET or 
when program type F10N PRO!"! and 26U and PPUR is off . 

Error type out: 

NOT ALL ONE : EPROM not erased in area 

ADR OVERFLOW : RAM/ROM area greater than IK 
or area not placed correct in 
EPR0P1. 

BAD ROW : More than 256 pulses needed for 
programming or not ok after last 
programming puis. 



page 2 
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Ref.#AE10 



■ ■_■_ TM 

insite 



INTEL USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 

Results 



□ 4004/40 D8008 D8080 D8048 D8085 D3000 B Other SDKBD (use addit.onal sheets .f necessary) 



SDK80 TRAP 

Inserts a branch to SDK80 monitor from the user program and a 
return path to the original program without loss of program 
flow. Allows all monitor facilities to be used to debug a 
program in RAM or inspect program operation. 

SDK80 with monitor routines. 

Program uses trap buffer memory 1000 to 102F if only 3 traps 
are used, leaving locations 1030 to 11FF for user programs. If 
extra memory is available the trap buffer origin may be shifted 
by altering locations 1240, 128F and 12A5 in the listing. The 
number of traps able to be used, up to 16, is determined by 
available buffer memory, requiring 16 (decimal) locations per 
trap. 

1. To insert a trap in a user program, return to monitor 

(RESET) and type .G1200 (CR) . Next type IJ,XXXX where I is 

the trap identifier, J is the range (either 3, 4 or 5) of the 

skipped code, and XXXX is the address where the trap is to be 

inserted. 

e.g. for the following program segment: 

LOC CODE MNEMONIC 

183D 3E3C MVIA,3C 

18 3F CDCDAB CALL ABCD 

a) to insert trap number 2 at 183D type 25, 183D 

b) to insert trap number 1 at 183F type 13, 183F 
Note that J must be 3, 4 or 5 and must completely span a 
program statement (or statements) . 



To remove trap I, enter the trap routine as above and type 
(CR) . Where I is the trap identifier number to be removed. 



3. To return to the user program from the monitor after enter 
ing a trap type G (CR) when the program will resume at the lef|t 
of PC value (as for the SDK monitor) or G XXXX (CR) to resume 
from location XXXX. 

When the trap point in the program is encountered TI is 
printed where I is the trap identifier, and control is 
passed to the SDK80 monitor. 



Source Listing available for $15.00. 
Paper Tane or Di skette Not Offered. 



Registers Modified: 



All 



RAM Required: 



IK and Buffer 



ROM Required: 



SDK Monitor 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



Programmer: 



C G Brickell 



Company: 



Address: 



Fisher & Paykel Ltd 



City: 



Private Ba g 



State: 



Panmure 

AUCKLAND 

NEW ZEALAND 



Intel Corporation, 1976 



4-466 



intel 



MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref . #AE1 1 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D 4040 □ 8008 



8080 □ 3000 



(use additional sheets if necessary) 



TRACE AND REGISTER PRINT OUT. 



TO PRINT OUT REGISTERS ON COMMAND OR TO STEP THROUGH / PROGRAM 
INSTRUCTION BY INSTRUCTION AND TO HAVE REGISTERS PRINTED CUT 
AFTER EVERY INSTRUCTION EXECUTED. IF TRACE PROGRAM I e ENDED* 
LAST ADDRESS EXECUTED WILL BE DISPLAYED. 



TTY — STANDARD INTEL SETUP. 



NONE. 



NONE. 



REGISTER HEADING ANT) CONTENTS. 



L 



Registers Modified: 

NONE. 



RAM Required: 

27 5H RAM LOCATIONS. 



ROM Required: 

NOME. 



Maximum Subroutine Nesting Level: 

NONE. 



Assembler/Compiler Used: 

INTELLEC MDS 800 



Programmer: 

R. A. POYNER 



Company: 

NAVAL OCEAN SYSTEMS CENTER 



Address: 

PT. LOMA SAN DIEGO, CALIF. 92152 

98-034C 

4-468 



insite 



Ref. #AB100 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



D 4004/4040 D8008 Q8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



EXEC 



To provide character oriented access to ISIS files, and a 
'clean' return to ISIS. 



MDS with at least 18K RAM, disk system, and console 



MDS monitor and ISIS VI. 2 



Registers Modified: 



RAM Required: 

initially to 46QQH,then to 39C2 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

ISIS 8080 MACRO ASSEMBLER VI. 1 



© Intel Corporation, 1976 

12/6/77 



Programmer: 

Rerry dp Koning 



Company: 

Toronto Transit Commission 



Address: 

1900 Yonqe Street 



City: 
Toronto, Ontario 



State: 
CANADA M4S 1Z2 



98-034D 



4-470 



insite 



Ref. #AB102 



INTEL® USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 

Results 



□ 4004/4040 D8008 BB080 D8048 D8085 □ Other. 



(use additional sheets if necessary) 



MDS BACK TO BACK DATA TRANSFER 

Enables data to be transmitted between two MDS systems using 
the high speed punch and reader interfaces 



Two MDS systems. One 7474 D flip flop 



PL/M 80 



The sending MDS system invokes the attached PLM program. 
The receiving MDS system uses the copy command as follows: 
COPY :HR: TO filename 



A file is transferred 



Registers Modified: 
ALL REGISTFRS 



RAM Required: 

8CH 



ROM Required: 
ADH 



Maximum Subroutine Nesting Level: 
3 



Assembler/Compiler Used: 

PL/M 80 



Programmer: 
Bi I I Holmes 



Company: 
NASA 



Address: 

Goddard Space Flight Center 



City: 
Code 535 Greenbelt 



State: 

Maryland 20771 



© Intel Corporation. 1976 

12/6/77 



98-034D 



4-474 



PL/M-80 COMPILER 

PHUb 

ISIS-II PL/M-80 V3. COMPILATION OF MODULE DPI I 
OBJECT MODULE PLACED IN : Fl : AB102. OBJ 
c ,--'o ILER If .jvoKED BV: PLMSO :F1:R6102 



*PRQEWIDTHC80> 

/+COPV FROM DISK TO : HP : +,•-' 

1 DPU : 

DO.; 

2 1 DECLARE ROUTINE RDDRESS INITIRLaiFD^FH"' ; 
- :: 1 DECLARE I BYTE.; 

1 1 DECLARE NULL BVTE INITIAL04H::- ; 

b 1 DECLARE BUFFER < 128 > BVTE.; 

6 1 DECLARE ACTUALfCOUNT ADDRESS.; 

? ± DECLARE STATUS ADDRESS; 

y 1 DECLARE AFT* IN ADDRESS.; 

* 1 DECLARE READtACCESS LITERALLV "l'.; 

10 1 OPEN : 

. . PROCEDURE':: AFT,. FILE, ACCESS, MODE, STATUS) EXTERNAL; 

,. ^ DECLARE <:AFT, FILE, ACCESS, MODE, STATUS:. ADDREsS; 

1* X END OPEN.; 

13 1 CLOSE : 

PROCEDURE':: AFT, STATUS;. EXTERNAL; 

* 2 DECLARE tRFT, STATUS > ADDRESS; 

15 2 END CLOSE.; 

16 1 READ : 

PROCEDURE •:: AFT, BUFFER, COUNT, ACTUAL . sTRT I Is :• EXTERNAL ; 
1 '" 2 DECLARE CAFT, BUFFER, COUNT, ACTUAL. STATUS':- ADDRESS;' 

1 ; = : 2 END READ.; " ' ~" 

19 1 EXIT: 

PROCEDURE EXTERNAL; 

20 2 DECLARE STATUS ADDRE'-.S; 

21 2 END EXIT; 

.•■'+ GET FILE NAME AND OPEN */ 

22 1 C; HLL RERLXl, . BUFFER, 128, . RCTURLSCOUNT, . STATUS':.; 
'* s X CHLL OPEN.::. AFT* IN, . BUFFER, READ* ACCESS, O, . STATUS:.'..; 

.•■•+ PUT OUT A DUMMV CHARACTER TO : HP ■ +/ 
X* 1 CALL ROUTINE .-NULL::-.; 

.-'+ COPV FILE TO .HP: */ 
25 1 ACTUAL*COUNT=l.; 

2 * 1 CO WHILE ACTUAL*COUNT O 0; 

27 _ 2 CFlLL REF| D ■:. AFT* I N, . BUFFER, 128, . ACTUALSCOUNT. ST ATI IS:. 

'" ; "r IF ACTUAL*COUNT<>0 THEN 

DO 1=8 TO ACTUAL*COUNT-l.; 
CALL ROUT I NE < BUFFER < I > > .; 



<& 



SI -*' END; 



4-476 



PL/M-80 COMPILER 



PAGE 



END, 



1 
1 
1 



RLL CLOSE': AFT* IN, 
ALL EXIT; 
END DPIJ; 



STATUS 



MODULE INFORMATION: 

CODE AREA SIZE 
VARIABLE AREA SIZE 
MAX I MUM STACK SIZE 
56 LINES READ 
O PROGRAM ERROR <.S> 



00 AD A 
008CM 
0008H 



172D 

140D 

3D 



END OF PL/M-80 COMPILATION 



4-477 



MPS ± 



AIDS ZL 




i 

03 



AIDS BACK TO BACK 



insite 



Ref. #AB103 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 &8080 D8048 D8085 □ Other. 



(use additional sheets if necessary) 



FDUMP 



FDUMP dumps an ISIS-II diskette file to another ISIS-II file 
in printable form: Hexadecimal, Octal and ASCII representations 
are included. 



MDS, MDS-DOS, Console Device 



MDS Monitor 
ISIS-I I 



FDUMP is called via a system command: 
-FDUMP file to f i le 



Error message (if any) to console. 

The output file is formatted as 72 byte lines Ceach followed 
by <CR> <LF>) containing Hexadecimal, Octal and ASCII 
interpretations of 8 bytes of the input line. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



Programmer: 

PSarth Faglpg-f io| rj 



Company: 

Micro Focus Ltd , 



Address: 

18 r Vernons Yard 



City: 

London W. I I . 



State: 

ENGLAND 



© Intel Corporation, 1976 

12/6/77 



98-034D 

4-480 



AB 104 



insite INTEL * USERS library submittal form 



□ 8008 □ 8048 m 8080/8085 D 8086 D Other 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(us* additional shaata If nacassary) 



ENHANCED MDS TEXT EDITOR, Xlll 

Adds Powerful features to Intel's VI. 6 Text Editor 



MDS-800 with disk operating system 



ISIS-II 



Revised 12/78 



*Series-II - 220 Users! Please request special macro for use woth 
integrated drive. 



Program offered in Object 
Code on diskette only for 
$50.00. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



Programmer: 



Company: 



Address: 



City: 



State: 



© Intel Corporalion, 1978 

12/78 



4-482 



Ref. #AB104 



The Enhanced Text Editor Maintains all the commands 
of Intel's current text editor (V1.6) with the 
addition of many new powerful features. Some of 
them are: 

1) Auto append. Text is automatically read 
into the text buffer from the specified 

file. 

2) Text rearranging. Blocks of text can be 
switched around. 

3) Macros. Command strings can be assigned 
to single letter or single control key 
designations. These macros can be written 
to a file called EDIT.MAC which is auto- 
matically read in when the editor is called. 

4) V-Markers. Eight different pointer 
positions can be designated to delineate 
the text area for various commands and 
block moves. 

5) Value stack. This gives the editor certain 

math capabilities so that operations like 

counting the number of times a strinq exists" 
can be done. 



4-484 



insite 



Ref . # AA16 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 □ 8048 3 8080/8085 □ 8086 □ Other. 



(use additional shaata if nacessary) 



DISKETTE RECOVERY PROGRAM, RECOVERY 1 

To permit recovery of files on an ISIS diskette whose directory 
file has been destroyed, but which is otherwise intact. 



Disk based Intellec MDS-800 



ISIS-II 



DISKETTE AVAILABLE IN LOCATED OBJECT 
CODE ONLY. PAPER TAPE AVAILABLE ON 
HEX ONLY. LISTING NOT AVAILABLE. 



Registers Modified: 

ALL 


Programmer: 


RAM Required: 


Company: 


ROM Required: 


Address: 


Maximum Subroutine Nesting Level: 


City: 


PL/M 80 or CROSS 
Assembler/Compiler Used: pl/M Compiler 


State: 



6/79 



4-486 



Ref.# AB106 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 08080 D3000 □ Other 



(use additional sheets if necessary) 



PRINT 



Lists any ISIS disk file on the line printer up to 255 times. Each 
copy is paged automatically. 



INTEL MDS-DOS 

Centronics 306C line printer 

LS1 ADM-3 VDU 



ISIS Version 1.2 
Monitor Version 2.0 



Enter Program name, space, and then file name. 



Listed File with tabulator characters implemented 



Registers Modified: 
AM 



RAM Required: 
As for ISIS 



ROM Required: 

Mon i to r 



Maximum Subroutine Nesting Level: 
3 



Assembler/Compiler Used: 
ISIS Macro V 1.1 



Programmer: 
R. C Taylor B.Sc. 



Company: 

McMichael Limited 



Address: 

Wexham Road 



City: 

S lough 



State: 

BERKS. SL2 5FI 



© Intel Corporation, 1976 

2/6/78 



98 034 C 

4-488 



Ref.# AB107 



inSlto INTEL * USERS LIBRAR Y SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 08080 D3000 □ Other. 



(use additional sheets if necessary) 



TYPE 



Lists any ISIS disk file on the system console (VDU) and prompts for 
a return key every page of information. 



INTEL MDS-DOS 

Centronics 306C line printer 

LSI ADM-3 VDU 



ISIS Version 1.2 
Monitor Version 2.0 



Enter Program name, space, and then file n 



ame. 



Listed File with tabulator characters implemented 



Registers Modified: 
All 



RAM Required: 
As for ISIS 



ROM Required: 
Monitor 



Maximum Subroutine Nesting Level: 
3 



Assembler/Compiler Used: 
ISIS Macro V 1.1 



Programmer: 

R. C Taylor B.Sc. 



Company: 

— McMichaftl LimitaH 



Address: 

Wexham Road 



City: 
S lough 



State: 

BERKS. SL2 5FI 



© Intel Corporation, 1976 

2/6/78 



98034C 

4-490 



Ref .# AB108 



inSlte " INTEL> USER S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 S8080 D3000 □ Other. 



(use additional sheets if necessary) 



JOIN 

Merges 2 hex files from separate assemblies into a single 
hex file for HEXBIN. Transfer address of primary file is 
retained. 



MDS 



ISIS 

ISIS command syntax: 

-JOIN <primary file>, <secondary file> 



Secondary file is appended to primary file; transfer address 
of secondary file is deleted; transfer address of primary 
file is applied to the total file. 



Registers Modified: 



RAM Required: 

From 32 OH through 353CH 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

ISIS Assembler 1.1 



Programmer: 

Richard Kucia 



Company: 

Realistic Controls 



Address: 
3530 Warrensville Ctr. Rd. 



City: 
Shaker Heights 



State: 

Ohio 



© Intel Corporation. 1976 

2/6/78 



98 034C 

4-492 



insite 



Ref .# AB1Q9 

INTEL 9 USER'S LIBRARY SUBMITTAL FORM~ 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004/4040 CI8008 H8080 D8048 D8085 D Other. 



— (use additional sheets if necessary) 



PRINT PROGRAM FOR G.E. TERM I NET - 1200 PRINTER 

Writes a diskette file to :T0:, inserting correct delays for 

CR LF characters for a G.E. Terminet - 1200 so the printer doesn't 

overprint short lines. 



Intel disk drive, G.E. Terminet- 1200 Printer on :T0: port, -TO- port 
strapped for 1200 Baud 



I S I S- I I DOS 



When ISIS command prompt shows on console, press "ON LINE" button 
on Terminet, enter "PRINT to <fi lename> CR" on console, where 
<filename> is an ISIS diskette file. 



Prints file on Terminet Printer with correct CR LF delays, 
or when done, displays a message on the console.' 



If error 



Registers Modified: 
ALL 



RAM Required: 

617 BYTES DECIMAL 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

PL/M Resident Compi ler 



Programmer: 

John S. Santic 



Company: 

Western Union Data Services 



Address: 

70 McKee Drive 



City: 
Mahwah 



State: 

New Jersey 07430 



© Intel Corporation, 1976 

2/6/78 



98-034D 

4-494 



insite 



Ref.#AB1_IO_ 

INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 08080 D8048 D8085 □ Other. 



. (use additional sheets if necessary) 



PRINT OUT SOURCE FILE OF FLOPPY DISK 

The function of this program is to print out source files stored on 
the floppy disk to the designated list device. This program 
recognizes the tab character. The tab in this program is set at 
every 8 spaces. 



MDS 800 
Console 
Floppy Disk 



ISIS-II, V2.2 
Monitor Program 



Go to monitor and assign the list device to console. 

Go to ISIS I I, V2.2 

Enter P followed by a space and the filename to be printed. 



The program will read the designated file and output this file to 
the console using the monitor output routine. The tab character 
be recognized by this program and set at every 8 spaces. 



wi 



Registers Modified: 

-ALL 



RAW Required: 
0172H Byte s 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
I INTE LIFC MPS MACRO ftc^rMpLfrp 
© Intel Corporation, 1976 

2/6/78 



Programmer: 

BJ 1 1 LUxiarlk 



Company: 
ITT Barton 



Address: 



900 So. Tii rhnll C.yn RH 



City 
City of Industry 



State: 

Cal i fornia 



98-034D 

4-496 



ASM80 :F1:AB110 

IS IS- 1 1 8080/8085 ASSEMBLER, VI. 



MODULE 



PAGE 



LOC OBJ 



0000 




0001 




0003 




0009 




0G0G 




000A 




0068 




0009 




F80F 




A000 




A000 


CDA2A0 


A003 


210400 


A006 


F9 


A0O7 


0E03 


A009 


11DEA0 


A00G 


CD0600 


A00F 


3AECA0 


A012 


B7 


A013 


C2C0A0 


A016 


0E00 


A018 


11D0A0 


A01B 


CD0000 


A01E 


3AECA0 


A021 


B7 


A022 


C2C0A0 


A025 


2ADEA0 


A028 


22DAA0 


A02B 


3E08 


A02D 


32F0A0 


A030 


0E03 


A032 


11DEA0 


A035 


GD0000 


A038 


3AECA0 



SEQ 



1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 



SOURCE STATEMENT 



;REF. NO. AB110 
; PROGRAM TITLE P 



THE FOLLOWING PROGRAM PRINTS OUT A SPECIFIED FILE ON THE CONSOLE 
DEVICE AND IS INVOKED BY THE COMAND UMMllJB 



P FILENAME 
BY BILL UHLARIK 



SEPT 21, 1977 



18 ; 

19 ; 

20 ; 

21 OPEN 

22 CLOSE 

23 READ 

24 EXIT 

25 ERROR 

26 ENDL 

27 I COUNT 

28 TAB 

29 LO 

30 ; 
31 

32 i 
33 

34 BEGIN: 

35 

36 

37 

38 

39 

40 

41 

42 

43 t 

44 

45 

46 

47 

48 

49 

50 

51 

52 ; 

53 

54 

55 LOOP: 

56 

57 

58 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EXTRN 

ORG 

CALL 

LXI 

SPHL 

MVI 

LXI 

CALL 

LDA 

ORA 

JNZ 

MVI 

LXI 

CALL 

LDA 

ORA 

JNZ 

LHLD 

SHLD 

MVI 

STA 

MVI 

LXI 

CALL 

LDA 





1 

3 

9 

12 

0AH 

0811 

09H 

0F80FH 

ISIS 



{LINE FEED CHARACTER 
TAB COUNT = 8 SPACES 
TAB CHARACTER 
ADDRESS OF OUTPUT ROUTINE IN MONITOR PGM 



0A000H 

ADV 

H.STACK+4 

CREAD 

D.RBLK 

ISIS 

STATUS 

A 

ERR 

C.OPEN 

D.OBLK 

ISIS 

STATUS 

A 

ERR 

AFT 

CAFT 

A, ICOUNT 

COUNT 

C.READ 

D.RBLK 

ISIS 

STATUS 



i CLEAR :LP: BUFFER 



;READ THE CONSOLE 



;OPEN THE INPUT FILE 



; INITIALIZE TAB COUNT 
sREAD THE INPUT FILE 



2/6/78 



4-498 



is i s -n vuwsumb assembler", vttb 



HUdTJle 



PAtJS 



. LOC OBJ 



SEQ 



SOURCE STATEMENT 



A03B B7 


59 




ORA 


A 


A03C C2C0A0 


60 




JNZ 


ERR 


A03F 2AE8A0 


61 




LHLD 


ACTUAL 


A042 7C 


62 




NOV 


A,H 


A043 B5 


63 




ORA 


L 


A044 CAADA0 


64 
65 i 
66 




JZ 


DONE 


AG47 21F1A0 


67 




LXI 


H, BUFFER 


AG4A 227 1A1 


68 




SHLD 


BP 


A04D 2AE8A0 


69 




LHLD 


ACTUAL 


A050 2B 


70 




DCX 


H 


A051 22E8A0 


71 




SHLD 


ACTUAL 


A054 2A71A1 


72 PRUT: 


LHLD 


BP 


A0O7 7E 


73 




MOV 


A,M 


A058 FE09 


74 




CPI 


TAB 


A05A CA83A0 


75 




JZ 


SPACE 


A05D FE0A 


76 




CPI 


ENDL 


A05F CA9AA0 


77 




JZ 


RESET 1 


A062 4E 


78 i 


CONTl: 


MOV 


C,M 


A063 CD0FF8 


79 




CALL 


LO 


A066 3AF0A0 


80 




LDA 


COUNT 


A069 3D 


81 




DCR 


A 


A06A 32F0A0 


82 




STA 


COUNT 


A06D CA92A0 


83 




JZ 


RESET 


A070 23 


84 


CONT: 


INX 


H 


A071 2271A1 


85 




SHLD 


BP 


A074 2AE8A0 


86 




LHLD 


ACTUAL 


A077 7C 


87 




MOV 


A,H 


A078 B5 


88 




ORA 


L 


A079 CA30A0 


89 




JZ 


LOOP 


A07C 2B 


90 




DCX 


H 


A07D 22E8A0 


91 




SHLD 


ACTUAL 


A080 C354A0 


92 




JMP 


PRNT 


A083 0E20 


93 


SPACE: 


MVI 


C.20H 


A085 CD0FF8 


94 




CALL 


LO 


A088 3AF0A0 


95 




LDA 


COUNT 


AOOB 3D 


96 




DCR 


A 


A08G 32F0A0 


97 




STA 


COUNT 


A08F C254A0 


98 




JNZ 


PRNT 


A092 3E08 


99 


RESET: 


MVI 


A, I COUNT 


A094 32F0A0 


100 




STA 


COUNT 


A097 C370A0 


101 




JMP 


CONT 


A09A 3E09 


102 


RESET 1 


: MVI 


A, ICOUNT+1 


A09C 32F0A0 


103 




STA 


COUNT 


A09F C362A0 


104 
105 


* 


JMP 


CONTl 


A0A2 0E0D 


106 


ADV: 


MVI 


C.0DH 


A0A4 CD0FF8 


107 




CALL 


LO 


A0A7 0E0A 


108 




MVI 


C,0AH 


A0A9 CD0FF8 


109 




CALL 


LO 


A0AC C9 


110 
111 


» 


RET 




A0AD CDA2A0 


112 


DONE: 


CALL 


ADV 


A0BO 0E01 


113 




MVI 


C , CLOSE 


A0B2 1IDAA0 


114 




LXI 


D.CBLK 


A0B5 CD000O E 115 




CALL 


ISIS 


A0B8 0E09 


116 




MVI 


C.EXIT 


A0BA 11EAA0 


117 




LXI 


D.XBLK 


A0BD CD0000 E 118 




CALL 


ISIS 




119 


; 







; START OF PRINT 

? INITIALIZE MEMORY POINTER 

(INITIALIZE BUFFER COUNTER FOR PRINT LOOP 
ACTUAL = ACTUAL - 1 



; CHECK FOR TAB 

; CHECK FOR END OF LINE 

; OUTPUT CHARACTER 

i UPDATE TAB COUNT 

! UPDATE BUFFER POINTER 
; CHECK FOR END OF BUFFER 

? UPDATE BUFFER COUNTER 
; ACTUAL = ACTUAL - 1 

; OUTPUT SPACE 

.CHECK IF TAB IS REACHED 

s RE- INITIALIZE TAB COUNT 
; RE- INITIALIZE TAB COUNT 

{CARRIAGE RETURN 8 LINE FEED ROUTINE 



;CLOSE THE INPUT FILE 
{NORMAL EXIT 



2/6/78 



4-499 



IS IS- 1 1 8080/8085 ASSEMBLER, VI. 



MODULE 



PAGE 



LOG OBJ 

A0C0 0E0C 
A0C2 11ECA0 
A0C5 CD0000 
A0C8 0E09 
A0GA 11EAA0 
A0CD CB00G0 

AOD0 DEA0 
A0D2 F1A0 
A0D4 0100 
A0D6 0000 
A0D8 ECA0 



A0DA 
AODC ECA0 



A0DE 0100 
A0E0 F1A0 
A0E2 8090 
A0E4 E8A0 
A0E6 ECA0 

A0E8 

A0Hfc ECA0 



A0EC 
A0EE ECA0 



SEQ 



SOURCE STATEMENT 



A0F0 
A0F1 



A171 
A000 



120 ERR: 


MVI 


C, ERROR 


121 


LXI 


D.EBLK 


122 


CALL 


ISIS 


123 


MVI 


CEXIT 


124 


LXI 


D.XBLK 


125 


CALL 


rsis 


126 ; 






127 OBLK: 


DW 


AFT 


128 


DW 


BUFFER 


129 


DW 


1 


130 


DW 





131 


DW 


STATUS 


132 ; 






133 CBLK: 






134 CAFT: 


DS 


2 


135 


DW 


STATUS 


136 s 






137 RBLK: 






138 AFT: 


DW 


1 


139 


DW 


BUFFER 


140 


DW 


128 


141 


DW 


ACTUAL 


142 


DW 


STATUS 


143 ; 






144 ACTUAL: 


DS 


2 


145 ; 






146 XBLK: 


DW 


STATUS 


147 ; 






148 EBLK: 






149 STATUS: 


DS 


2 


150 


DW 


STATUS 


151 ; 






152 COUNT: 


DS 


1 


153 BUFFER: 


DS 


128 


154 ; 






155 ; 






156 BP: 


DS 


2 


157 ; 






158 


END 


BEGIN 



; ERROR MESSAGE 



{ERROR EXIT 



PUBLIC SYMBOLS 



EXTERNAL SYMBOLS 
ISIS E 0000 



USER, SYMBOLS „ 
ACTUAL A A0E8 

CAFT A A0DA 
CBLK A A0DA 

EBLK A A0EC 
ENDL A 000A 

LO A FEOF 
LOOP A A030 

RESET A A092 
RESET1 A A09A 



ADV A A0A2 

CLOSE A 0001 
ERR A A0C0 

OBLK A A0D0 
SPACE A A083 
ASSEOTLY COMPLETE, NO ERRORCS) 



AFT A A0DE 
CONT A A07G 
ERROR A 000C 
OPEN A 0000 
STATUS A A0EC 



BEGIN A A000 

C0NT1 A A062 

EXIT A 0009 

PRNT A A054 

TAB A 0009 



BP A Ai71 
COUNT A A0F0 
I COUNT A 0008 
RBLK A AODE 
XBLK A A0EA 



BUFFER A A0F1 
DONE A A0AD 
ISIS E 0000 
READ A O003 



2/6/78 



4-500 



' Ref.# AB111 

■nSltg INTEL ° USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 D8080 D8048 □8085 □ Other. 



(use additional sheets if necessary) 



ONLINE, UPLOAD, DOWNLOAD 

To use the Intel lee MDS-800 as a terminal or to transfer files 
to/from any timesharing system. (Specifically PDP-10) 



A Serial Port 

(Attached documentation describes addition of an RS232 Port) 



User must write a driver on the host computer to communicate 
with upload and download. 

User must also modify programs to compile on the compiler 
chosen and to run on the user's system configuration. 



NOTE: ONLINE is available in Assembly 

Language only, UPLOAD and DOWNLOAD are 
available in PL/M only. 









■ — 1 


Registers Modified: 
ALL 


Programmer: 


RAM Required: 


Company: 


ROM Required: 


Address: 




Maximum Subroutine Nesting Level: 


City: 


Assembler/Compiler Used: 
Sfifi Note 


State: 


© Intel Corporation. 1976 

10/78 




98-034D 
4-502 



Ref .# AB111 



ONLINE, UPLOAD, DNLD 

To use the MDS as a terminal, or to transfer files to/from the PDP-10, the 
user needs three MDS programs: ONLINE, UPLOAD, DNLD. The user may need to 
make changes to the hardware configuration as specified in the attached spec. 
Once the hardware changes are made, the general algorithm is: 

. Use program ONLINE to call up the PDP-10. 

. Hit carriage return twice (should get period'.' prompt) 

. Log on to the PDP-10 (or your host computer) 

When ready to transfer files, hit the 'break' key, which will return 

you to ISIS. 

Type what needs done: 

UPLOAD MDS- filename to PDP-filename 
DNLD PDP-filename to MDS-filename 

To get back to the PDP-10, re-type ONLINE (no need to log. in again) 
Be sure to log off. 



4-503 
2/6/78 



Ref.# AB111 



MPS Modifications for PDP-10 Communication 



When choosing a serial port, there are two alternatives on the Intellec MDS. 
The first you may use the teletype port, which is a current loop serial line. 
Otherwise, a second monitor board may be added to the system, in parallel to 
the original monitor board, giving you an extra RS232 port. 

Modifications are made to this extra monitor board so that its CRT port can 
be used as the PDP-10 port: 

First, the base address of the "CRT" port on the new monitor board must be 
changed from F0 to D0. This entails cutting the trace to pin 15 of chip 
A34, and jumping pin 14 of the same chip to the feed-through adjacent to pin 
16 (which is where pin 15 used to be connected) . 

Second, the new monitor board needs a special harness which connects to the 

CRT connector (PDP-10 line). There are four wires in the harness and one junper 

On the board connector, 2 wires from pin A15 go to cable connector pin 7. One 
wire from board connector pin 14 to cable connector pin 3. One wire from board 
connector pin 15 to cable connector pin 2. One jumper on board connector from 
pin A4 to A10. 

Software 

Be sure your software contains the correct port numbers for the serial line 
you chose to use. 

Baud Rate Changes 

If a baud rate of 300 is desired fo the following on the second monitor card: 
Change jumper from 2400 baud (standard 19 to 20) to 300 baud (13 to 14). 
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MICROCOMPUTER USER'S 
LIBRARY SUBMITTAL FORM 



Ref.# AE12 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D 4040 □ 8008 H 8080 □ 3000 



(use additional sheets if necessary) 



STEP 

Single-steps an assembly language program and halts in the 
monitor after each instruction. The registers may then be 
examined or changed, or the program continued. The STEP 
program can be used in conjunction with the Monitor's "GO" 
command to execute subroutines, then continue the single-step 
mode. May be resident completely in ROM. 

8080 CPU console 



Monitor version 3.0 (can be changed) 



User program via the Monitor "GO" command using at least 1 
breakpoint. After executing the breakpoint, the program may 
be single stepped in one of two ways (assuming STEP is in ROM) 
1) Place a JMP to STEP in an unused restart location, and 

interrupt the CPU with the console switches set to the 

proper value 

Modify the monitor to have another command (may be "0") 
and type that letter. 



2) 



The STEP program will execute the next instruction and then 
print the new PC, all registers are saved. This program 
will not single step in ROM, as it uses the restart 1 break- 
point logic. 



Registers Modified: 



All 



RAM Required: 

Monitor exit template 



ROM Required: 



246 



Maximum Subroutine Nesting Level: 

1 



Assembler/Compiler Used: 
Macro V.4.0 



Programmer: 

Gary Saxer 



Company: 

ATE ASSOCIATES, INC, 



Address: 



8448 Reseda Blvd., #201 
Northridge, CA 91324 



98-034C 



O /£ /~IQ 



Ref.# AE12 

8080 V3.0 

•D100, 10F (Little program from 100-10A) 

0100 21 00 02 00 3E 0F 23 3C C3 06 01 00 00 00 00 26 

••s:s;s 3 (s?; r r; r 3 o gr ™! ace jmp to step at rst 2 ioMtio "- -" ^ »-»'• »•■**•■ *> ■»* 

*0100 (Stops at beginning) 

■X (Register contents) 

A=00 B=00 O00 D-00 E=00 F=02 H=00 L=00 M=0000 P=0100 S=0100 

'f*T Interrupt switch depressed, causes RST 2 to be executed 

*0103 

" x notechange 

A=00 B=00 C=00 D=00 E=00 F=02*1}^2T=W»M=0200 P=0103 S=0100 

• < - RST 2 

*0104 

• x no change (NOP) 

A=O0/ B=00 C=00 D=00 E-00 F=02 H=02 L=00 M=0200 P=0104 S=0100 

•< RST 2 

*0106 

•X note change 

A=0F B=00 C=00 D=00 E=00 F=02 H=02 L=00 M=0200 P=0106 S=0100 

• < RST 2 

*0107 

• x noie change 

A=0F B=00 C=00 D=00 E=00 F-02 / fe$2i^0> M=0201 P=0107 S=0100 

•< RST 2 

*0108 
.X 

A=10 B=00 C=00 0=00 E=00 F= 12 H=02 L=01 M=0201 P=0108 S=0100 
•< RST 2 

*0106< note that the target of the JMP instruction was trapped 

A- 10 B=00 C=00 D=00 E=00 F= 1 2 H=02 L=01 M=0201 P=0106 S=0100 
•< RST 2 

*0107 
•X 

A=10 B=00 C=00 D=00 E=00 F= 1 2 H=02 L=02 M=0202 P=0107 S=0100 

•< RST 2 

*0108 
.X 

A=11 B=00 C=00 D=00 E=00 F=06 H=02 L=02 M=0202 P=0108 S=0100 

•< RST 2 

*0106 

.G,108^ — "GO" command break points at 108 

*0108 

.X 

A=12 B=00 C=00 D=00 E=00 F=06 H=02 L=03 M=0203 P=0108 S-0100 

•< RST 2 "Step past 108" 

*0106 

.G,108< Then do instructions and STOP at 108 aqain 

*0108 b 

.X 

A=13 B=00 C=00 D=00 E=00 F=02 H=02 L=04 M=0204 P=0108 S=0100 
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;REF. HO. AE12 

; PROGRAM TITLE STEP 



386B 
3809 

3A26 
3E01 



0000 CD013E 
0003 1 1F8FF 

0006 19 

0007 F9 



0008 
0O0B 
000 C 
00GD 
000E 
000F 
0011 
0014 
0015 
0016 
0017 
0019 
001C 
001E 
0021 
0023 
0026 
0028 
0O2B 
0020 
002D 
0030 



211300 

39 

46 

2B 

4E 

1E01 

211400 

39 

E5 

0A 

FEC3 

CA33O0 

FECD 

CA3300 

FE3F 

DA3CO0 

FECI 

D25500 

ID 

1C 

CB9D30 

C3263A 



i 

TITLE ISTRUCTION STEP 11-17-76* 
; INSTRUCTION STEP FUNCTION G. SAXER 11-17-76 
START EQU 386BH 
CO EQU 3809H 

•VERSION 3.0 EQUATES (NOTE MEMS I Z NOT MEMCRTO 
G03 EQU 3A26H ; CONTINUE WITH PROGRAM (V3) 
MEMS I Z EQU 3E01H 

• THE FOLLOWING SPECIAL CODE IS NEEDED IF THE ROUTINE IS 

Snot called directly from the monitor (E.g. restart) 



CALL MEMS I Z 

LXI D,-8 

DAD D 
SPHL 



GET TOP OF MEM 
POINT AT END OF REGS 
HL->TOP OF STACK FOR MONITOR 
FAKE MONITOR STACK 



END OF SPECIAL AREA 



I NCR: 



INCRD: 
INCRE: 
IRCRF: 



LXI 

DAD 

MOV 

DCX 

MOV 

MVI 

LXI 

DAD 

PUSH 

LDAX 

CPI 

JZ 

CPI 

JZ 

CPI 

JC 

CPI 

JNC 

DCR 

INR 

CALL 

J MP 



H,0013H 

SP 

B,M 

H 

CM 

E,01H 

H.O014H 

SP 

H 

B 

0C3H 

INCRA 

0CDH 

INCRA 

03FH 

INCRB 

0C1H 

INCRC 

E 

E 

TRAP 

G03 



iGET OLD PC 



;E= BYTES TO SKIP 
; POINT TO TLOC 

SAVE TLOC 

LOAD NEXT OP CODE 

JMP? 

YES 

CALL? 

YES 

<= MVI A? 

YES 

> POP B? 

YES 

FAKE E=0 

E=E+1 

TRAP AT (BC)+(E> 

CRLF AND RESUME PROG 



i 



UNCONDITIONAL JUMPS 



0033 CDE703 
©036 CDA200 



INCRA: CALL LDBI 
CALL TRAPA 



; PLACE LOC IN DC 
;TRAP INST 
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0039 C33000 



003C CD9300 
003F FE01 
0041 CA5100 
0044 7A 



JMP 



INCRB: 



CALL 

CPI 

JZ 

MOV 



INCRF {RESUME PROG 



OP CODES <= 03E 



SIXE 
01H 
THREE 
A,D 



;8B IMMEDIATE? <YES=NO RETURN) 
16B IMMED? 
YES 
GET OP CODE 



0045 FE20 




CPI 


020H 


;< LXI H? 


0047 DA2D00 




JC 


INCRE 


; YES E= 1 


0O4A E607 




AM 


07H 


; CLEAR UPPER 


004C FE02 




CPI 


02H 


;ADR? 


004E C22D00 




JNZ 


INCRE 


;N0 E=l 


0051 1C 


THREE: 


INR 


E 




0052 C32C00 




JMP 


INCRD 


;E=3 




; OP 


CODES > 


CI 




0055 CD9300 


INCRC: 


CALL 


SIXE 


?8B IMMED? 


0058 FE08 




CPI 


08H 


; RET? 


005A CAB400 




JZ 


TRPRT 


;YES 


005 D B7 




ORA 


A 


;RET? 


O05E CAB400 




JZ 


TRPRT 


;YES 


0061 IF 




RAR 




;EVEN OP CODE? 


0062 DA7100 




JC 


IOST? 


;N0 


0065 CDE700 




CALL 


LDBI 


;GET LOC TO TRAP 


0068 CDA200 




CALL 


TRAPA 


(TRAP (BC) 


006B CDF000 




CALL 


FIX 




006E C35100 




JMP 


THREE 


(TRAP NEXT LOC 


0071 7A 
0672 FED3 


IOST?: 


MOV 
CPI 


A,D 
0D3H 


CHECK EXCEPTIONS 
OUT? 


0074 CA2C00 




JZ 


INCRD 


YES E=2 


0077 FEDB 




CPI 


0DBH 


IN? 


0079 CA2C00 




JZ 


INCRD 


YES 


007C FEC9 
007E CAB400 




CPI 
JZ 


0C9H 
TRPRT j 


REAL RET? (UNCOND) 
YES 


0081 FEF.9 




CPI 


0E9H ; 


PCHL? 


0083 C22D00 




JNZ 


INCRE ; 


NO E=l 


0086 211100 
0089 39 
00OA 4E 


5 


LXI 
DAD 

MOV 


H, 001 1H ; 
SP ; 

CM 


YES GET HL INTO BC 
POINT TO HL LOC 


008B 23 




INX 


H 




008G 46 




MOV 


B,M 




0G3D CDA2G0 




CALL 


TRAPA 




0090 C33600 




JMP 


INCRF 


OUT OF HERE 




; CHECK FOR IMMEDIATE IN 


ST 


0093 57 


SIXE: 


MOV 


D,A , 


SAVE OP CODE 


0094 E607 




ANI 


07H ; 


CLEAR UPPER 5 
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0096 


FE06 




CPI 


06H 




0098 


C0 




RNZ 


; 


WOT 8B IMMED 


0099 


El 


SIXXT: 


POP 


H { 


IGNORE OUR GALL 


009A 


C32C00 




JMP 


INCRD ; 


E=2 






i SET 


TRAP AT 


(BC)+(E) 




0091) 


03 


TRAP: 


I NX 


B ; 


BC+E 


009E 


ID 




DCR 


E 




069F 


C29D00 




JNZ 


TRAP 




00 A2 


El 


TRAP A: 


POP 


H i 


RET ADDR IN HL 


00 A3 


E3 




XTHL 


i 


SWAP WITH TLOG 


09A4 


78 


MOV 


A, 3 






00A5 


Bl 




ORA 


C ; 


HO TRAP AT ZERO 


00A6 


CAC80© 




JZ 


STOP 




00A9 


71 




MOV 


M,C i 


SAVE TRAP LOC 


00 AA 


23 




I NX 


H 




00 AB 


70 




MOV 


M,B 




00AC 


23 




I NX 


H 




00AD 


0A 




LDAX 


B 


LOAD OP CODE 


00AE 


77 




MOV 


M,A 


SAVE IT 


00AF 


23 




INX 


H 


POINT TO NEXT TLOC 


00B0 


3ECF 




MVI 


A.0CFH 


LOAD RST 1 


00B2 


02 




STAX 


B 


SET TRAP 


00B3 


C9 




RET 







TRAP A RETURN 



O0B4 210900 
00B7 39 
0OB8 56 
0OB9 2B 
00BA 5E 
00BB EB 
00BC CDEA00 
00BF CDA200 
00G2 CDF000 
00C5 C32D0O 



TRPRT: 



LXI 

DAD 

MOV 

DCX 

MOV 

XCHG 

CALL 

CALL 

CALL 

JMP 



H,0O09H ;OLD SP LOC 

SP 

D,M 

H 

E,M 



LDBI2 
TRAPA 
FIX 
INCRE 



ILLEGAL TRAP 



00C8 21D908 STOP: LXI 

00CB 06OE MVI 

OeCI) 4E MOV 

0OCE CD0938 CALL 

001)1 05 DCR 

0OD2 23 I NX 

00D3 C2CDO0 JNZ 

0006 C36B38 JMP 

O0D9 54524150 MSG: DB 



;GET SP POINTER 

; POINT TO RET ADDR 



; AFTER RET INST 



H.MSG 

B,0EH 

CM 

CO 

B 

H 

$-6 

START 

'TRAP TO ZERO' ,0DH,0AH 
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0ODD 20544F20 
00E1 5A45524F 
00E3 0D0A 



00E7 C5 
00E8 El 
00E9 23 
00EA C5 
0OEB Dl 
00EC 4E 
00ED 23 
00EE 46 
00EF C9 



00F0 E3 
00F1 E5 
0OF2 D5 
0GF3 CI 
00F4 1E01 
00F6 C9 
0000 



TRAP A LOC POINTED TO IN MEMORY 



! 

; 

LDBI: PUSH 
POP 
I NX 

LOB 12: PUSH 
POP 
MOV 
I NX 
MOV 
RET 



B 

H 

H 

B 

D 

CM 

H 

B,M 



5 PUT BC IN HL 

; POINT PAST OP CODE 
;SAVE BC IN DE 

;GET NEW BC 



;TRAPA NEXT(TLOC ON TOP CANT CALL HERE) 
RESTORE LDBI SAVED STUFF 



FIX: 



XTHL 

PUSH 

PUSH 

POP 

MVI 

RET 

END 



H 

B 
E, 1 



;GET RET ADDR 

;PUT IT BACK (TLOC PUT BACK TOO) 

; RESTORE BC 
;,RESET E 
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insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/40 D8008 D8080 LI 8048 D8085 D3000 D Other. 



(use additional sheets if necessary) 



Program Test-Loader 

Load/Dump/Test ROMSTH (8048 Support Software) 



Intel ROM Simulator, Intellec MDS DOS System 



See attached documentation 



See attached documentation 



Avai lab le on 
diskette only. 



Registers Modified: 

N/A 


Programmer: 

John Kovach 


RAM Required: 

N/A 


Company: 

Magnavox 


ROM Required: 

N/A 


Address: 

1700 Magnavox Way 


Maximum Subroutine Nesting Level: 

N/A 


City: 

Fort Wayne 


Assembler/Compiler Used: 
ISIS I ASM 80 VI. 1 


State: 

Indiana 



Intel Corporation. 1976 



12/78 
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Ref.# AE13 

1.0 INTRODUCTION 

The Program Test Loader is an Intel 8080 program designed to test, load, and 
dump the Intel ROM Simulator from the Intellec MDS system operating under 
either ISIS-I or ISIS-II. It was writtento provide the 8048 developer with 
a means to load and dump 8048 object files to and from locations D000H to 
DFFFH of the ROM SIMULATOR. It also provides a programmable feature that 
tests the RAM located in the ROM SIM. 

2.1 INVOKING THE PROGRAM 

The Program Test-Loader is invoked from either ISIS-I or ISIS-II by typing 
PTL and a carriage return in response to the system dash prompt (-). The 
program must exist in binary format on diskette before it can be invoked. 

2.2 OPTIONS 

The Program Test Loader provides the user with the options tabulated in 
Table 2A. Each option is invoked by its name or by the short hand notation 
given for that option (in parenthesis). The format for specifying options 
is as follows: OPTION, SPACE, LIST, CARRIAGE RETURN. 

OPTIONS may be entered after the program has given the question mark prompt ("?"). 

Each time an option has been completed, the program returns a message to 

verify the option performed and then issues the question mark prompt ("?") 

to indicate it is ready to receive another option request. Table 2-B tabulates 

the responses given to each option request. 



Ref .#AE14 



insite INTEL " USERS library subm ittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 □ 8048 8080/8085 D 8086 □ Other. 



(uta additional ahaata if nacaaaary) 



Symbol Table Program for 8080/8085 ^Version 1.2 

To print a symbol table of a previously located program sorted 
alphanumerical ly or by address, and printed in columns. Publics, 
Local Symbols, and PL/M Line numbers are included. 



Intel lee MDS with disk drive 



I S I S- I I 



See reverse page 4-516 



See reverse page 4-516 

^ Revised 12/78 
- 20$ faster 



now accepts more than 255 symbols per module. 



Available in object code 
on diskette or HEX code 
on paper tape. 



Registers Modified: 



RAM Required: 



32K 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



PL/M-80 V3.0 



Programmer: 



Gary Carleton 



Company: 



Intel Corp. 



Address: 



City: 



State: 



© Intel Corporation, 1978 
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SYMBOL TABLE PROGRAM 
Description : 

The program is invoked by entering: 

SYMBOL FILE1 [TO F I LE2] [PAGEW I DTH(n )] [ADDR] [NOTRUNC] 
(Brackets indicate optional controls) 



FILE1 : 
FILE2: 

PAGEW I DTH ( n ) 

ADDR: 
NOTRUNC: 



Previously located object file program. 

ISIS file where symbol table is to be written. Can be :LP:, :C0:, 

a disk file, etc. 
Number of characters per line similar to PL/M and assembler controls. 

n must be less than 200. 

Specifies sort by address instead of sort by name. 

Symbol names are normally truncated to the first ten characters. 
NOTRUNC causes no truncation. 



DEFAULT VALUES 
These are the values used when the optional controls are not specified: 
FILE2 - FILE1.SYM 
PAGEW I DTH (n) - n=80 

ADDR - Sort by symbol name (or line number) 
NOTRUNC - Truncate at tenth character 

As with the LOCATE symbol table, the original assemblies or compilations must 
have used the DEBUG control for the symbol table to be included in the object 
module. The normal sequence of program execution when using SYMBOL is: 

1. Assemblies or Compilations (with DEBUG) 

2. LINK ( If necessary) 

3. LOCATE (without PURGE) 

4. SYMBOL 

If you use the PURGE control, the following step should be added: 

5. LOCATE (with PURGE) 

For convenience, steps 3, 4, and 5 may be included in a submit file. 

Notes : 

The sort algorithm used is not the most efficient. Because of this, 
large modules may cause the Intel lee to pause for a minute or more. 

Also, SYMBOL should be on a system diskette for ISIS to properly regain 
control after execution. 
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PAGE 



PROGRAM INVOKED BY: 










SYMBOL :F1:SAMPLE TO 


:TO: 








PUBLICS: 










3B3FH 


6P0014 


3B40H 


§P0015 


3B43H 


epooi6 


3B44H 


§P0017 


3B4CH 


§P0O29 


3B4EH 


epoo3o 


3B6BH 


§P0031 


3B6EH 


§P0032 


3B6FH 


§P0033 


3B76H 


epoc^ 


3B78H 


§P0035 


3B8AH 


0POO48 


3B8DH 


§P0049 


3B94H 


6P0096 


3B97H 


§P0097 


3B9EH 


6P0101 


3BA1H 


§P0102 


3A84H 


BCDASCIITO 


3872H 


BINTOBCD 


368BH 


BLANKS 


3A10H 


CHAREQL 


3BA9H 


ERROR 


3BBEH 


EXIT 


3901H 


HEADING 


37BDH 


HEXADDRTCA 


3C36h 


IMAFTN 


0040K 


ISIS 


3789h 


ISISERR 


3 A D 2 h 


LINECONV 


3C3AH 


LONGNAMES 


3C38K 


OUTAFTN 


3C3DH 


OUTFILE 


3C3CH 


PAGEWIDTH 


3BCDH 


READ 


398FH 


READREC 


3C3BH 


SORTBYADDR 


3BF1H 


WRITE 


39BFH 


WRITEREC 






MODULE 


: MAINPROGRAM 










SYMBOLS: 










3C36H 


INAFTN 


3C3AH 


LONGNAMES 


3C9DH 


MEMORY 


3C38H 


OUTAFTN 


3C3DH 


OUTFILE 


3C3CH 


PAGEWIDTH 


3C3EH 


SORTBYADDR 










LINE NUMBERS: 










3680H 


7 


3686H 


8 


3689H 


9 


MODULE 


: UTILS 










SYMBOLS: 










3C57H 


ASCIIINDEX 


3C5BH 


BCDADDR 


3A84H 


BCDASCIITO 


3C78H 


BCDPTR 


3C59H 


BINADDR 


3C7AH 


BINPTR 


3872H 


BINTOBCD 


368BH 


BLANKS 


3C6BH 


BUFFADDR 


3A10H 


CHAREQL 


3C80H 


DESTINPTR 


3C5DH 


DIGIT 


3753H 


ERRMSG1 


376FH 


ERRMSG2 


3C4DH 


ERRNUM 


3901H 


HEADING 


3C55H 


HEX 


37BDH 


HEXADDRTOA 


3C58H 


HEXINDEX 


3C7EH 


HEXLINPTR 


3C51H 


HEXPTR 


3C60H 


I 


3C77H 


I 


3C7DH 


I 


3C84h 


INDEX 


3789H 


ISISERR 


3C6DH 


LEN 


3C76H 


LEN 


3C7CH 


LEN 


3AD2H 


LINECONV 


3C9DH 


MEMORY 


3C82H 


NAMLENPTR 


3C6FH 


NUMOFLINES 


3C69H 


READCNT 


398FH 


READREC 


3C65H 


RECLEN 


3C5EH 


REMAINDER 


3C53H 


RESULTPTR 


3C4FH 


STATUS 


3C61H 


STATUS 


3C67H 


STATUS 


3C70H 


STATUS 


3C72H 


STRG1PTR 


3C74H 


STRG2PTR 


3C63H 


TEMBYTES 


39BFH 


WRITEREC 










LINE NUMBERS: 










3789K 


17 


378FH 


19 


37AOH 


20 


37A8H 


21 


37B9H 


22 


37BCH 


23 


3 7EDH 


24 


37C7H 


26 


37CEH 


27 
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SYMBOL 


TABLE PROGRAM, 


VERSION 1.1 


37D6H 


28 


37DBH 


29 


3804H 


31 


3614H 


32 


3826h 


34 


363EH 


35 


385CH 


37 


3860H 


38 


3871H 


40 


3872H 


41 


368CH 


44 


3895H 


45 


38B4H 


47 


38BAH 


48 


36DAH 


50 


36E4H 


51 


3901h 


53 


3901H 


55 


3916H 


57 


392DH 


58 


393EK 


60 


394DH 


61 


395CH 


63 


395FH 


64 


398lh 


66 


39&9h 


67 


398FH 


69 


3995H 


71 


39B6h 


73 


39BEH 


74 


39CEH 


77 


39D6H 


78 


39EOK 


81 


39E8H 


82 


39FBH 


64 


3A07H 


85 


3A10h 


87 


3A1FH 


89 


3A4FB 


91 


3A53K 


92 


3A60B 


94 


3A63K 


95 


3A&1B 


97 


3A84h 


98 


3A93h 


101 


3A98H 


102 


3AA7H 


104 


3ACAH 


105 


3AD1h 


107 


3AD2H 


108 


3AEFB 


111 


3AF4B 


1 12 


3B08h 


114 


3B0BH 


115 


3B3MH 


117 


3B3EB 


118 
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37E7H 


30 


3822h 


33 


384EH 


36 


3865H 


39 


387Ch 


43 


38A9H 


46 


38D0H 


49 


3900H 


52 


3908H 


56 


3938B 


59 


3958H 


62 


3975K 


65 


398EH 


68 


39AAH 


72 


39BFH 


75 


39DDK 


80 


39E8H 


83 


3A0FH 


86 


3A24H 


90 


3A56H 


93 


3A7EH 


96 


3A84H 


99 


3A9DH 


103 


3ACEH 


106 


3AE3H 


110 


3B04H 


113 


3B14H 


116 



STARTING ADDRESS: 3680H 



2/6/78 



4-518 



insite 



Ref.# AB112 



INTEL 8 USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 D8080 H8048 D8085 D Other, 



(use additional sheets if necessary) 



8048 - Seven Segment Display Interface Subroutines — SCAN 

Collection of utility subroutines which may be used with the 
8048 family to scan a keyboard matrix, debounce and encode 
key depressions, and drive a multiplexed seven segment displ4y. 
Also included are utilities to translate Hexidecimal data 
into segment patterns, right or left entry to the display 
registers, and clearing or writing character sequences to 
the display. 

Simple X-Y matrix of up to 64 switches, seven-segment display 
up to eight digits, and high current segment and digit 
drivers. Matrix & display size may be increased arbitrarily 
with the addition of external decoders. 

User-written background program (game, calculator, telephone 
dialer, etc.) requiring low-cost keyboard and display 
capability. 

Determined by user's program and utilities selected. 



Live keyboard, continuous flicker-free multi-character 
display. 



Program offered 
on diskette only. 



Registers Modified: Pointers & one 
in Bank0 and four in Bankl 


Programmer: 

J . Wharton 


RAM Required: 

12 bytes 


Company: 


ROM Required: 
250 10 bytes 


Address: 


Maximum Subroutine Nesting Level: 
3 


City: 


Assembler/Compiler Used: 
ASM48 V2.0 


State: 



Intel Corporation. 1976 
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Ref.# AB113 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



□ 4004/4040 D8008 D8080 D8048 08085 D Other. 



. (use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



AP29 "USING THE 8085 SERIAL I/O LINES" 



Two software packages using the 8085 SID and SOD pins for serial 1/0. 
The first set of subroutines may be used to interface an 8085 to a 
CRT at a wide range of baud rates, with automatic rate identification, 
The second set includes two low- 1 eve I utilities for recording and 
reloading bytes of data using an inexpensive audio cassette recorder 
and simple interface. 



This code was used in the appendix of Intel Application Note AP-29 
"USING THE INTEL 8085 SERIAL 1/0 LINES". The software and hardware 
required is fully described in the note. 



The Application note AP-29 wil 
be included with the program. 



Registers Modified: 
Al 1 


Programmer: 

J . Wharton 


RAM Required: 

4 Bytes & Stack 


Company: 


ROM Required: 
326 Bytes 


Address: 


Maximum Subroutine Nesting Level: 


City: 


Assembler/Compiler Used: 
ASM80, V1.0 


State: 



© Intel Corporation, 1976 
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Ref.# AB114 



INTEL USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 (38080 E&048 D8085 DOth 



er_ 



. (use additional sheets if necessary) 



8048 TUNE GENERATOR 

Generates fixed sequence of tones and spaces (i.e. Music) 



See attached diagram. 



None 



This program will run repetitively through the sequence 
of notes and spaces starting address TAB, ending when 
OFFH character is encountered. The pitch and tempo will 
vary with basic clock frequency but can be altered in the 
program (this program was run using ALE = 5 m.sec.) 



Programmed tune 



Registers Modified: 
RO. Rl. R2. R3 + Flags FO + Fl 



RAM Required: 

4 Bytes for registers 



ROM Required: 

57 + Tune 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

ISIS-II 8048 Assembler VI. 2 



Programmer: 



Harvey 



Company: 

A r 



very-Hardoll Ltd. 



Address: 

Downley Road 



City: 



HAVANT, Hants, 



State: 

ENGLAND 



© Intel Corporation, 1976 
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_L 



AVERY- HARDOLL L TD HAVANT HANTS 



-4 RefTHj AB114 



THIRD ANGLE 
PROJECTION 



a- 




+ 5V — t 



7 



f.s 



J Q 

R S 



K C 



L 5- 



+ 5V 



BC 
IS4 LC 



> 



DIVIDE BY 4 
I 10 

. — a 



- II 



CD4027 



J Q 

R S 



K C 



L S- 



r 



5| 



121 



"1 



iJ 



33K 



PORT 10 



l A 



27 



/ 3CD4050 



_s~ 1 

•V: 



39 



ALE 



Tl 



8748 



FEATURE 



CHARACT — 

-ERISTIC 



TOLERANCE 



DATUM 



GEOMETRICAL TOLERANCES 



ISS 



MOD. No. ZONE 



ALTERATION 



ALL SCREW THREADS TO B.S. 3643 UNLESS OTHERWISE STATED. 
SURFACE FINISH MICROMETER SYMBOLS ARE TO B.S.1134CLA. 
SYSTEM SURFACES MARKED \/tO BE MACHINED TO FINISH INDICATED. 




PART NAME 1 



HARDWARE REQUIRED 
FOR GENERATION OF TUNE 



4/78 



SOFTWARE 



USED ON 



SIG. 



DATE 



USED ON 



LIMITS UNLESS OTHERWISE STATED. 



SCALE: 



DRN 



TR. 



CHK 



6 
299- 



±0-2 



30 
99-9 



±0-3 



100 
2999 



±0-5 



300 
999-9 



±0-8 



1000 
2000 



±1-2 



SUB ASSY 



PART No. 



SIZE 

A4 
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Ref.# AB114 



I SIS- 1 1 MCS-48/UPI-41 MACRO ASSEMBLER, V2. O 



PAGE 



LOC OBJ 



SEQ 



0010 

0010 1414 

0012 0410 

0014 234F 

0016 AS 

0017 A3 

0018 A9 

0019 62 
001A BAFF 
001C BB16 
001E 45 
001F 042D 

0021 7625 
0023 16ZiE 



0025 EA21 
0027 EB21 

0029 BB16 
002B 18 
002C A5 

002D F8 
002E A3 
002F A9 

0030 C637 

0032 37 

0033 C63A 
0035 0421 

0037 B5 

0038 0425 



1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 

21 

23 
24 
25 
2b 



SOURCE STATEMENT 



; ***************************************** 

; TUNE GENERATION ROUTINE 

• 27-1-78 

; ***************************************** 

; WHEN CALLED AS A SUBROUTINE, THIS PROGRAM 

> GENERATES A PREDETERMINED TUNE IN THE FORM 

; OF A SQUARE WAVE TONE ON PORT 1, BIT &. 

: DURATION OF NOTES IS DETERMINED BY #TEMPO._ 

} PAUSES CI. E. NO TONES ARE SIGNIFIED IN THE 

i TUNE TABLE BV "P" C#0OHX 

; TUNES SHOULD FINISH WITH #OFFH. 



30 
31 

32 



ORG 10H 

START: CALL TUNE 
JMP START 

TUNE : MOV A, #TAB 
MOV R0, A 
MOVP A, ii"A 
MOV Rl, A 
MOV T, A 
MOV R2, #OFFH 
MOV R3, #TEMPC 
STRT CNT 
JMP INIT 

LOOP1: JF1 L00P2 
JTF TIMER 



35 
36 



39 
48 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 



L00P2 : D JNZ R2, LOOP1 
DJNZ R3, LOOP1 
MOV R3, #TEMPO 
INC RO 
CLR Fl 

INIT: MOV A, RO 
MOVP A, ©A 
MOV Rl, A 
JZ NOTONE 
CPL A 
JZ FINISH 
JMP LOOP1 

NOTONE: CPL Fl 

JMP L00P2 



4/78 



CALL TUNE SUBROUTINE 

START ADDRESS OF TUNE SEQUENCE 
NOTE DIVISION FACTOR 

DEFINES DURATION OF NOTES 



JUMP IF "PAUSE" 
JUMP IF TIMER OVERFLOW 

"NOTE DURATION" TIMING LOOP: 

JUMP BACK IF R2 NOT FULL 
■I H " pj: " <• 

INCREMENT NOTE ADDRESS 
CLEAR "NO NOTE" FLAG 

NEW NOTE ADDRESS 

; NEW DIVISION FACTOR 

; JUMP IF D. F = OOH CPAUbE) 

; JUMP IF D. F=OFFH CEND OF TUNE> 
i JUMP TO NOTE DURATION LOOP 

; SET "PAUSE" FLAG 
i .TUMP AVOIDING COUNTER O/F TEbT 

4-527 



AB114 



I Sib- 1 1 MCS-48/UPI-41 MACRO ASSEMBLER, V2. 



PAGE 



LOC OBJ 



>EQ 



SOURCE STATEMENT 



OS 



003A 99FE 
003C 65 
003D 93 



003E 65 
003F 3-7 

0040 95 

0041 B647 
0043 8901 
0045 0449 
0047 99FE 
0049 F9 
004A 37 
004B 62 
004C 45 
004D 0421 



801b 



003C 

0040 

0043 
0047 
0O4B 

0050 

0055 
0059 
005F 
0065 
006B 

0071 

0078 

0000 



004F 65 

0050 65 

0051 00 

0052 65 

0053 65 

0054 00 

0055 59 

0056 59 

0057 00 

0058 6B 



54 


FINISH: 


ANL PI, #0FEH 


55 




STOP TCNT 


56 




RETR 


57 






58 






59 






60 






61 


TIMER: 


STOP TCNT 


62 




CPL A 


63 




CPL F0 


64 






65 




JF0 OPRST 


€■€■ 




ORL PI.. #01H 


67 




JMP CONT 


68 


OPRST : 


ANL PI, #0FEH 


69 


CONT : 


MOV A, Rl 


70 




CPL A 


71 




MOV T, A 


r i£. 




STRT CNT 


73 




JMP LOOP1 



74 



7y 
80 
81 



84 



88 
89 
90 
91 
92 
93 
94 
95 
96 
9? 
98 TAB 



TEMPO 



TC 
B 

A? 

AA 

Q? 

Q 

F? 

F 

E 

D? 

D 

C"? 

BC 



EQU 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 



RESET O/P BIT CPORT 1 BIT Q> 
•+•■+ END OF ROUTINE ** 

TIMER OVERFLOW ROUTINE: 



; FLAG SET HI & LO ON 

,' ALTERNATE CYCLES 

.; SET OUTPUT BIT <PORT 1 BIT 0> 

.: RESET OUTPUT BIT 

.; NOTE DIVISION FACTOR 

:■ RELOAD TIMER 

.■ RETURN TO "NOTE DURATION" LOOP 



16H 



DEFINES LENGTH OF NOTES 





.; NC 


iTE: 


60D 


.; TC 


IP 


C 


64D 


; 




B 


67D 


.; 




A# 


71D 


.; 




A 


75D 


t 




G# 


80D 


.; 




G 


85D 


j 




F# 


89D 


.; 




F 


95D 


.■ 




E 


101D 


.; 




D# 


107D 


.; 




D 


113D 


.; 




C# 


120D 


:• BOT. 


c 



00H 



; PAUSE- NO TONE FOR 1 
.: CVCLE 



DB D?, D?, P, D?, D?, P, F, F 



9y 



DB P, D, D, D, P, D?, P, F 
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PRGE 



LOC OBJ 



SEQ 



SOURCE STATEMENT 



0059 6B 

905ft 6B 

005B 00 

005C 65 
005D 00 
005E 59 
005F 59 

0060 00 

0061 50 

0062 50 

0063 00 

0064 50 

0065 50 
&QG6 00 

0067 4B 

0068 4B 
&&69 00 
006fl 50 
006B 50 
006C 50 

006D 00 

006E 59 
006F 00 

0070 65 

0071 65 

0072 00 

0073 
0074 
0075 
0076 

0077 65 

0078 00 

0079 6B 
007fl 6B 

007B 00 

007C 65 
007D 65 
007E 65 
007F 65 

0080 00 

0081 65 

0082 00 

0083 59 

0084 00 

0085 50 
0086 
0087 

0088 00 

0089 43 
008ft 43 

008B 00 

008C 43 

008D 43 

008E 80 

808F 43 



59 
59 
80 
65 



00 

4B 



100 



DB F.. P, G> G, P.. 0.. C P 



101 



DB G?.. G?.. P, G.- G; G.. P.. F 



102 



DB P, D?, D?, P, F, F.. P, D 



lti3 



DB D?, P> D, D, P.- D?.. D?, D 



104 



DB D?, P, D?, P, F, P, G 



105 



186 



DB P, G?, P, ft'1 



DB ft?.. P.. ft?., ft?.- P.- ft?-, ft?' P 
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ISIS- I I MCS-43/UPI-41 MACRO ASSEMBLER, V2. 8 



PAGE 



LOC 


OBJ 


0090 


43 


0091 


08 


0892 


43 


0093 


43 


8094 


42 


0095 


00 


0096 


4B 


0097 


00 


0098 


50 


0099 


50 


009A 


00 


009B 


4B 


009C 


4B 


009D 


00 


009E 


4B 


009F 


4B 


00A0 


08 


00A1 


4B 


00A2 


4B 


00A2 


00 


00A4 


4B 


80A5 


4B 


00A6 


4B 


00A7 


88 


80A8 


50 


00A9 


88 


00AA 


59 


00AB 


59 


00AC 


00 


00AD 


50 


08AE 


50 


08AF 


00 


00B0 


4B 


00B1 


88 


00B2 


50 


00B3 


00 


00B4 


59 


00B5 


88 


00B6 


65 


00B7 


88 


00BS 


58 


00B9 


58 


00BA 


58 


00BB 


88 


00BC 


4B 


00BD 


88 


80BE 


43 


00BF 


43 


00C0 


88 


00C1 


3C 


00C2 


88 


00C3 


4B 


80C4 


88 


00C5 


58 


00C6 


50 



SEQ 



187 



SOURCE STATEMENT 



OB A?, A?, A?, P, Q?, P, G., G 



108 



DB P, G?.. G?, P, G?, G?, P, G1 



10y 



DB G?/ P, G?.. G?, G?, p, G, P 



110 



DB F, F, P, G, G, P, G?, P 



111 



DB G, P, F.. P, D?, P, G, G 



112 



DB G, P, G?, P, A?, A?, P, TC 



113 



DB P, G?, P, G, G, P, F, F 
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I SIS- 1 1 MCS-48/UPI-41 MRCRO ASSEMBLER, V2. PAGE 

LOC OBJ SEQ SOURCE STATEMENT 



114 DB P, D?, D?, D?, D?, D?, D?, P 



00C7 00 

00C8 59 

00C9 59 

00Cfl 00 

00CB 65 

00CC 65 

00CD 65 

00CE 65 

00CF 65 

00D0 65 

00D1 00 

00D2 00 115 *B P- *> P' P" P" P- P' 0FFH 

00D3 00 

00D4 00 
00D5 00 

00D6 00 

00D7 00 

00D8 00 
00D9 FF 



BC 0078 
FINISH 0O3R 

P 0000 









116 














117 




END 




USER S 
ft? 
E 
L00P2 


VMBOLS 
0043 
00 5 F 
0025 


RR 0047 
F 0059 
NOTONE 0037 




B 

F? 

OPRST 


0040 

0055 
0047 


TIMER 


003E 


TUNE 


0014 








RSSEMBLV COMPLETE, 


NO ERR< 


URS 







C? 


0071 


CONT 


G 


0050 


Q? 


STRRT 


0010 


TRB 



4-531 
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Ref.# AB115 



insite" INTEL ' USERS library submittal form 



Program 
Title 

Function 



Required 

Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 £33080 D3000 □ Other. 



(use additional sheets if necessary) 



Card Reader Driver, Hollerith to ASCII Conversion 

Punched card input utility. 

Reads from Documation M-200 Card Reader, 

performs Hollerith to ASCII translation, 

writes to user-specified diskette file on Intellec MDS 

using ISIS-II file management. 

1. Intellec MDS, any console, diskette drives. 

2. Documation M-200 Card Reader. 

3. CompuScan-designed card reader interface. 

1. ISIS-II Intel Systems Implementation Supervisor. 

2. Executable utility file. 

Standard program invocation format is utilized; e.g. if the 
utility is filed under the name CDRDRV , then the program is 
called with the name of the destination diskette file as an 
argument: CDRDRV filename where filename follows ISIS-II 
file naming syntax, and may include a diskette drive specifier 

Diskette file is created with user-specified name; 
data is ASCII coded; card records are trimmed of trailing 
spaces, and a carriage return and line feed are appended 
to each record. 



Notes : 

A. Console break is provided: CTRL-A from the console causes 

reading to stop prior to the next card pick; the disk file 

is closed, and control returns to ISIS. 

Normal file termination via end-of-file card consisting of 

a multi-punch of at least all eight punches 2 through 9 in 

column 1. 

Practicality of implementation depends upon card reader 
interface, hnt Holleri th to ASrn translation will be of 



B 



jfcC 



genera l interest . 



Registers Modified: __. „.» , . ,, 

not applicable 



RAM Required: CQde seg length: 2D6H 

data se y lemjth : — ASH- 



ROM Required: 



stack seg length: 64H 



Maximum Subroutine Nesting Level: 

unknown but minimal 



Assembler/Compiler Used: 

I SIS-II 8080/8085 Assembler v, 



Programmer: George Cotsonas 

Alex Schapira — 



Company: 



CompuScan , Inc . 



Address: 



900 Huyler Street 



City: 



Teterboro 



State: 
.0 



New Jersey 07608 



© Intel Corporation, 1976 
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Ref.# AB116 



insite INTEL * users library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 CX8080 D8048 D8085 D Other 



(use additional sheets if necessary) 



COMPARE files 



Compares two files, and indicates whether they are 
identical or not. 



MDS-800 



ISIS-I or II 



Execute by the command 

-COMPAR filel file2 

(space or comma between filenames) 



If files identical, a message to that effect. 

If not, the differences are listed on the console. 

If more than 8 bytes differ, further messages are not 

output, but the total number of errors is stated at 

the end. 

If the files are of different lengths, this is also stated, 



Registers Modified: 
ALL 



RAM Required: 
32K 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
PL/M-80 and ASM80 



Intel Corporation, 1976 

4/78 



Programmer: 
D. W. 



Wright 



Company: Standard Telecommuni- 
cation Laboratories Limited 

Address: 
London Road 



City: 

Harlow, Essex. 



State: 
UK 
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Jnsitg " INTEL * USER S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 CX8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



SBC 80/10 8255 Test 



Test SBC 80/10 8255 I/O Ports 
as Mode outputs 



Required SBC 8 0/10, TTY/CRT console 

Hardware 



SBC 80 P Monitor 



To initiate test type G3D00 on console. 



To Console; 

- # ; on completion of test 

- Port #, error bit pattern 

; if an error occurrs during test 



Registers Modified: 



RAM Required: 
00D9H 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



Programmer: 
P. N. Mark 



Company: 

Durand Machine Co. Ltd. 



Address: 

101-llth Street 



City: 
New Westminster 



State: 
British Columbia, CANADA 



© Intel Corporation, 1976 
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Ref.# AA17 



"IS- 1 1 S8S0/80S5 MACRO ASSEMBLER, V2. 9 



MODULE 



PAGE 



LOG OBJ 



;eq 



SOURCE STATEMENT 



FFFF 



08E7 
0OEB 
0080 

0080 

00E4 
00E5 
30E6 
00E8 
00E9 
O0EA 



10 

11 

12 
12 
14 
15 
16 
17 
18 
1.9 
20 
21 
22 
-"■"? 



SBC80 SET 0FFFFH 

•> TITLE 'SBC80/10 8255 MODE OUTPUT TEST PBC1V102077' - 

; PERFORMS INCREASING.?: DECREASING BIT TEST ON SBC80/10 

■> 8255 PORTS < PROGRAMMED AS MODE OUTPUTS "> 

i IF ANV ERROR IS ENCOUNTERED. 

;THE PORT # &THE ERROR PATTERN IS OUTPUTED 

i TO THE SYSTEM'S CONSOLE 

> PROGRAM EQUATES 

CWR1 EQU 0E7H ; GROUP 1 CNTL REG 

CWR2 EQU 0EBH ; " 2 "" 

MCW1 EQU 08OH i " 1 MODE OUTPUT 

MCW2 EQU 080H .; " 2 " 

POT0 EQU 0E4H ; PORT GROUP 1 

POT1 EQU 0E5H ; " 1 

P0T2 EQU 0E6H .; " 2 

P0T3 EQU 0E8H ; PORT 3 GROUP 2 

P0T4 EQU 0E9H .; " 4 

P0T5 EQU 0EAH ; " 5 



0600 

0605 

01E8 
0212 
02C2 



2 P.' 
29 
30 
31 



34 
35 
36 



SETFW EQU 060OH ; FORWARD TEST CONSTANT 



SETBK EQU 0605H 
CO SET 01E8H 

exit set 0212h 
he;-; 



REVERSE " " 

SBC80P OUTPUT TO CONSOLE SUB 
ERROR RECOVERY ROUTINE 



SET 02C2H ; " HEX OUTPUT SUB 



IF NOT SBC80 

CO SET 0381H ; IF NOT SBC80P MONITOR 

EXIT SET 0150H 

END IF 



3D00 



3DO0 


3E89 


3D02 


D3E7 


3D04 


3E80 


3D06 


D2EB 


3D08 


31FF3F 


3D9B 


3E02 


3D0D 


F5 


3DSE 


110096 


3D11 


0600 


3D13 


21D13D 



39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 
52 



ORG 3D00H 



MVI A, MCW1 

OUT CWR1 

MVI A, MCW2 

OUT CWR2 

LXI SP, 3FFFH ; INIT' STACK 

MV I A, 2 .; SET TEST PASS CTP 

PUSH PSW .; &SAVE 



INIT 8255'S 
GROUP 1 

2 



GO : 



LXI D.. SETFW 
MVI B, 
LXI H, LOWW 



<D=PORT CTR E=PORT ID> FORWARD TEST 
;0=FWD 1=REVERSE TEST DIRECTION 
;FWD TEST PATTERN PTR 
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IS IS- J I 8080/8085 MACRO ASSEMBLER, V2. MODULE PAGE 

LOC OBJ SEC! SOURCE STATEMENT 



:'D1.6 0EO~ 



2D2A 3E02 
3D3C 93 
2D2D C2492D 
2D40 7E 
2D41 D2E6 

2D43 CDC23D 

2D-16 DBE6 
2D48 C9 



2t"19 2E02 

2D4C C2582D 
2D4F 7E 
2D50 D2E8 

3D52 CDC23D 
3D55 DBE8 
2D57 C9 



5') PASS: 

55 MVI C, 7 ; SET PORT BIT CTR 

57 /.MAIN TEST ROUTINES 



59 TEST: 

? r,io rs 69 PUSH B .; SAVE TEST DIR 

?D±9 01AD2D 61 LXI B, CHECK .; SIMULATE CALL 

"T'lt": C5 62 PUSH B 

62 

64 PORTO: ; PORT O ROUTINE 

?|vi r, p,p 65 XRA A 

?d"'E ■='3 66 SUB E ; I DEPORT O? 

tt-.Jf r---'B2D 67 JNZ P0RT1 

-T>2? ?E~ 68 MOV A, M .; VES, GET PATTERN 

tt.22 D2E-1 €3 OUT POTO ; OUTPUT TO PORT O 

70 

-'DP* r:DC22D 71 CALL DELAY > DELAV FOR . 5 SEC 

-[;,2P r,pp4 72 IN POTO ; READ BACK PATTERN 

?r,2fl r:q 72 RET ; GO CHECK FOR MATCH 

74 .; 

?■=; pnpTl: ..PORT 1 ROUTINE 

- D -, E . -?p ei 76 MVI A, 1 ;SEE PORT O ROUTINE FOR DESCRIPTION 

;. D '; D Q7~' 77 SUB E 

~:D2E C27A2D 78 -JNZ P0RT2 

7D21 7E 79 MOV A, M 

2D22 D2E5 

2D24 CDC22D 

2D27 DBE5 
-•r,--ci i-;q 



80 


OUT P0T1 


81 




!— 1 ,- - ' 


CALL DELAV 


.-.-• 


IN P0T1 


84 


RET 


85 


; 


86 


P0RT2 : .; 


c* r 


MV I A, 2 


88 


SUB E 


89 


JNZ P0RT2 


90 


MOV A, M 


91 


OUT P0T2 


92 




93 


CALL DELAV 


9-4 


IN P0T2 


95 


RET 


96 


.; 


97 


P0RT3 : .; 


98 


MVI A, 2 


99 


SUB E 


100 


JNZ P0RT4 


101 


MOV A, M 


102 


OUT P0T3 


102 




104 


CALL DELAV 


105 


IN P0T3 


106 


RET 


107 


.; 



II II 



II II II II 
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ISIS-II 808O/8085 MACRO ASSEMBLER, V2. 6 MODULE PAGE 2 

LOC OBJ SEQ SOURCE STATEMENT 

■»«* -r-«. 108 P0RT4: 'SEE PORT ROUTINE FOR DESCRIPTION 

2D5* _<E04 109 MVI A, 4 

2D5A 93 110 SUB E 

3D5B C2672D 111 JNZ PORTS 

3D5E 7E 112 MOV f\, M 

3D5F D3E9 112 OUT P0T4 

114 

2D61 CDC22D 115 CALL DELAY 

3D64 DBE9 116 IN P0T4 

3D€6 C9 117 RET 

118 ; 

119 PORTS: .DEFAULT TO TEST PORT 5 
-JD67 7E 120 MOV A, M 

3D68 D2EA 121 OUT POTS 

122 

2D6R CDC23D 123 CALL DELAV 

3D6D DBEA 124 IN POTS 

3D6F C9 125 RET 

126 ; 

127 INDEX: 

3D70 CI 128 POP B ; RESTORE TEST DIR 

3D '' 1 0D 129 DCR C ;DEC PORT BIT CTR 

3D72 CA823D 130 JZ NEXT ; INDEX PORT CTR? 

iD73 78 121 MOV A, B ; DIRECTION? 

2D76 A7 122 ANA A 

2D77 C27E3D 122 JNZ BACK t FORWARD? 

J;5 ^„r Hi INX H ^ES, INDEX PATTERN PTR 
->' B C31S2D 125 JMP TEST ; CONT FWD TEST 

126 ; 

127 

128 BACK: 

?^f r-ir,-,n JS ™2 H ; BfiCKWRRD T EST DEC PATTERN PTR 
-D.-F C^1D_<D 140 JMP PORTO .; CONT TEST 

141 

142 NEXT: 

3DS2 78 143 MOV A, B ; DIRECTION? 

-£D83 A7 144 ANA A 

Z?!i '; : ? 8B - D 145 J2 INC ; IF FWD INDEX TO HIGHER PORT 

4noo JL, r "f DCR E - : ELSE DEC TO LOWER PORT 
_'D.r.y Ci8C2D 147 JMP INC+1 

148 

149 INC: 
2D8B 1C 150 INR E ; INDEX TO NEXT PORT 
- D -' c 15 151 DCR D ;DEC PORT CTR 

fr2S S 9B2D JS J^f ' IF *LL PORT TESTED CHANGE DIRECTION 
- [ - B 7B 152 MOV A.. B .; DIRECTION? 

2D91 A7 154 ANA A 

2D92 C2123D 155 JNZ GO+5 .; FWD.. RESET FWD PATTERN PTR 

156 

157 

158 BKWD: 
2D95 21D82D 159 LXI H.. HI I ; REVERSE PATTERN TEST PTR 
sVSe C2163D 160 JMP PASS ; GO RESET PORT BIT CTR 

161 

162 DONE?: 4_541 



:S-II 8089/8085 MACRO ASSEMBLER, V2. MODULE PAGE 4 

.OC OBJ SEQ SOURCE STATEMENT 

1G3 POP PSW .: RESTORE TEST PASS CTR 

164 DCR A > 2 TEST PASSES? 

1*5 PUSH PSW i SAVE TEST PASS CTR FOR NEXT PASS 

166 JZ EXIT ; RETURN TO MONITOR IF DONE 

167 

168 MOV A, B j DIRECTION? 

169 ANA A 

170 JNZ GO ; BRANCH TO GO IF REVERSE 

171 MOV B, E jPREV WAS FWD 

172 LXI D, SETBK ; REVERSE TEST PATTERN 
172 JMP BKWD ;G0 TO REVERSE TEST 
174 

175 j CHECK FOR PATTERN MATCH 

176 .: IF ERROR ENCOUNTERED, PRINT OUT PORT* 

177 ; ERROR BIT PATTERN, & RETURN CONTROL TO MONITOR 

178 i 

179 CHECK: 

:-C-fiD BE 180 CMP M ; MATCH? 

: 'DAE CA703D 181 JZ INDEX i INDEX TO NEXT BIT IF MATCH 

182 

183 

184 IF SBC80 
, DB1 F5 185 PUSH PSW .; ERROR, SAVE ERROR PATTERN 

?r>po ye 186 MOV A, E 

-,t^ rt-r-T^ 187 CALL HEX i PRINT PORT* 

"iE"-0 188 MVI C, ' ' 

189 CALL CO > " SPACE 



D9B 


Fl 


D9C 


3D 


'D9D 


F5 


:D9E 


CA1202 


rDAl 


78 


:DA2 


R7 


:DA3 


C20E3D 


?DA6 


43 


>DA7 


1105O6 


j:DAA 


C3953D 



2DB6 

3DB8 CDE801 

3DEB Fl 190 POP PSW 

3DBC CDC202 

ZDBF C31202 



1*1 CALL HEX i " ERROR PATTERN 

192 JMP EXIT ! RETURN CONTROL TO MONITOR 



193 END IF 
194 

195 IF NOT SBC80 

196 PUSH PSW 

197 MOV A, E 

198 RST 4 

199 MVI C, ' ' 

200 CALL CO 

201 POP PSW 

202 RST 4 

203 JMP EXIT 

204 END IF 
205 

206 

207 ; 

208 i . 5 SEC DELAV SUBROUTINE 

209 

210 DELAY: 

"Di-2 i":=i 211 PUSH B -.^.^-ronT 

tr;r^ £ FF 212 MVI C, OFFH > SET 590MS CONSTANT 

213 

214 DLV1: 

■?DC^ 06FF 215 MVI B, 0FFH i " 2MS 

" 216 

217 DLV2: 
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5 IS- 1 1 8980/8085 MACRO ASSEMBLER, V2. MODULE PAGE 



SEQ SOURCE STATEMENT 



LOC 


OBJ 


3DC7 


05 


3DC8 


C2C73D 


2DCB 


0D 


3DCC 


C2C53D 


3DCF 


CI 


3DD0 


C9 



3DD1 0001 
3DD3 0307 
3DD5 0F1F 
3DD7 3F 
2DD8 7FFF 



PUBLIC SVMBOLS 



FVTERNflL SVMBOLS 



USER SVMBOLS 



218 


DCR B 


219 


JNZ DLV2 ;2 MS? 


220 


DCR C 


221 


JNZ DLV1 ;50O MS? 


222 


POP B 


223 


RET 


224 


.; 


225 




226 


;TEST PATTERNS 


227 




228 


LOWW: DW 0180H 


229 


DW 0703H 


230 


DW 1F8FH 


231 


DB 3FH 


232 


HI I: DW 0FF7FH 


233 




234 


END 



BACK 


A 


3D7E 


BKWD 


A 3D95 


CHECK 


A 


3DAD 


CO 


A 


01E8 


CWR1 


A 


00E 


DLV1 


A 


3 DCS 


DLV2 


A 3DC7 


DONE? 


A 


3D9B 


EXIT 


A 


6212 


GO 


A 


3D0 


I H'~'- 


A 


2D8B 


INDEX 


A 3D70 


LOWW 


A 


3DD1 


MCW1 


A 


0080 


MCW2 


A 


008 


PORTO 


A 


3D1D 


PORT1 


A 3D2B 


P0RT2 


A 


3D3A 


P0RT3 


A 


3D49 


P0RT4 


A 


3D5 


POT1 


A 


00E5 


P0T2 


A O0E6 


P0T3 


A 


00E8 


P0T4 


A 


O0E9 


POTS 


A 


00E 


SETFW 


A 


0600 


TEST 


A 3D18 




















ASSEMELV 


COMPLETE, NO 


ERRORS 
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Ref. #AA18 



insite INTEL * USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D4004/4040 D8008 38080 D8048 D8085 SOther ^COpe 8 2 Puse additional sheets if necessary) 



liScope 820 Test Instrument, i SBC™ 80/10 Diagnostic Program 

Performs GO/NO GO test and diagnostics on all iSBC™ 80/10 
functional areas: CPU, RAM, ROM, SERIAL I/O, PARALLEL I/O 
OFF-BOARD RAM, & SELF-CHECK. 



iSBC 80/10, uScope™ 820 Microprocessor System Console, 
8080A u Scope Probe 



2716 EPROM with Diagnostic Program 



None 



See attached page 



Available on non-system 
diskette only — $35.00. Source 
object and list file included 
The Applications Note AP-42 
also included with program. 



Registers Modified: 
N/A 



RAM Required: 
N/A 



ROM Required: 
N/A 



Maximum Subroutine Nesting Level: 
N/A 



Assembler/Compiler Used: 
N/A 



Programmer: 



Company: 



Address: 



City: 



State: 



© Intel Corporation, 1976 

6/78 



. _ 98-034D 

4-545 



TM 
ySCOPE 82 TEST INS TRUMENT , 

. TM ~~ 

lSBC 80/10 DIAGNOSTIC PROGRAM 



This program used in conjunction with Intel's y Scope™ 

820 Test Instrument dramatically reduces the costs to support 

microprocessor based systems in the field. For example, using 

this program a field service technician can walk up to a down 

TM 
lSBC 80/10 based computer system and, 

1st with less than 10 key strokes uniquely configure 
the test program to the System's Options, 

2nd run a complete CPU exercise with diagnostics to 
make sure the heart of the system is fine, 

3rd test each of the major areas of the system and 
provide diagnostics easily understood by the 
technicians, and 

4th provide advanced capabilities for finding inter- 
mittents and providing fault isolation to the 
compontent level. 

The tests performed include: 

• CPU at System Clock Rates 

• RAM and ROM up to 64K 

• Serial, Parallel, and Multibus™ I/O 

• Self-Check on the Test Program itself 

The program allows the user to create a 2716 EPROM which 

plugs into the socket on the yScope™ 820 Console front panel. 

TM 
The iSBC 80/10 Diagnostic Program is written to allow the 

user to easily modify sections to customize the program for 

his unique requirements. The program is heavily commented to 

aid the user. A more detailed discussion of the program is 

presented in Intel's Applications Note #42, "Writing Diagnostics 

with the yScope 820 Microprocessor System Console". 
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Ref .#AA19 



insite 



INTEL' USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 CX8080 D8048 D8085 D Other, 



. (use additional sheets if necessary) 



IOTEST - I/O Test Program for the SBC 80/20 

To exercise all output lines of the 8255' s and the 8251 
USART for a teletype interface on an SBC 80/20 board. 



An SBC 80/20 board and a teletype adapter such as the 
SBC 530. The program can be easily configured for a CRT 
at a higher baud rate. 



NONE 



NONE 



Each 8 bit output port will operate as an 8 bit synchronous 
up counter allowing all I/O lines and drivers to be checked 
as well as testing the interface to the logic external to 
the board. 

The USART will transmit an ASCII continuously until 
another character is received after which it will then 
repeat the new character. The tape reader control line 
is also toggled. 



Registers Modified: 
A,B,C,H,L 



RAM Required: 
NONE 



ROM Required: 
77 Bytes 



Maximum Subroutine Nesting Level: 




Assembler/Compiler Used: 

ISIS II 8080/8085 MACRO V2.0 



Programmer: 

Lee Mandell 



Company: 

LJM Associates 



Address: 
6331 Glade Ave., Suite 318 



City: 
Woodland Hills 



State: 

California 91367 



1 Intel Corporation, 1976 



6/78 



98-034D 

4-549 



flbM80 :F1:I0TEST 



ISIS-II 8080/8085 MACRO ASSEMBLER, V2. O 



IOTEST 



PAGE 



LOC OBJ 



SEQ 



SOURCE STATEMENT 



3800 




00ED 




0000 


3ECE 


0002 


D3ED 


0004 


3E27 


0006 


D3ED 


0008 


3EB6 


000 A 


D3DF 


000C 


3E63 


000E 


D3DE 


0010 


3E02 


0012 


D3DE 


0014 


3E80 


0016 


D3E7 


0018 


D3EB 



1 


i I/O ' 


rEST PROGRAM FOR THE SE 


ill! 




NAME IOTEST 


s 


RAM 


EQU 380OH 


4 


TTVRP2 


EQU OEDH 


5 


; UART 


INITIALIZATION FOR TEL 


6 


START : 


MVI A, OCEH 


"? 




OUT OEDH 


y 




MVI A, 27H 


9 




OUT OEDH 


10 


.; 8251 


INITIALIZATION - 1. 76 


11 




MVI A.. 0B6H 


12 




OUT ODFH 


13 




MVI A, 63H 


14 




OUT ODEH 


15 




MVI A., 02H 


16 




OUT ODEH 


17 


i OUTPUT PORTS INITIALIZATION 


18 




MVI A.. 80H 


13 




OUT 0E7H 


20 




OUT OEBH 


21 


.; 





80/2O 



r'PE 



KHZ FOR TIMER #2 



24 



OUTPUT O FROM TELETYPE CONTINUOUSLY 
UNLEbb CHARACTER FROM TELETYPE ENTERED 
THEN TRANSMIT NEW CHARACTER CONTINUOUSLY 



26 ; TOGGLE READER CONTROL AT 10 HZ 

27 .; TOGGLE ALL OTHER I/O AT LOOP RATE 



001A 


013O27 


29 


LOOPO : 


LXI 


B, 2730H 


001D 


210000 


30 




LXI 


H, O 


0020 


■cCS 


31 


LOOP : 


I NX 


H 


0021 


7D 


32 




MOV 


A, L 


0022 


D3E4 


Ji-_£ 




OUT 


0E4H 


0024 


D3E5 


34 




OUT 


0E5H 


O026 


D3E6 


"?*=: 




OUT 


0E6H 


O028 


D3E8 


36 




OUT 


0E8H 


0O2A 


D3E9 


37 




OUT 


0E9H 


O02C 


D3EA 


— ■■!• 




OUT 


OEAH 


002E 


DBED 


39 




IN " 


n'VRP2 


0O3O 


E601 


40 




AN I 


1 


O032 


CA3EO0 


41 




JZ ( 


:onti 


0O35 


r* y 


42 




MOV 


A.. B 


0O36 


EE02 


43 




XRI 


2 


0638 


47 


44 




MOV 


B, A 


0O39 


D3ED 


45 




OUT 


TTVRP2 


0O3B 


79 


46 




MOV 


A, C 


O03C 


D3EC 


47 




OUT 


TTVRP2-d 


0O3E 


DBED 


48 


CONT1 : 


IN 1 


'TVRP2 


0040 


E602 


49 




AN I 


o 


0O42 


CA2O00 


58 




JZ LOOP 


0045 


DBEC 


51 




IN 1 


"TVRP2-1 


004? 


E67F 


cr-j 




AN I 


7FH 



1 
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ISIS- 1 1 8680/8085 MfiCRO ASSEMBLER, V2. 



IOTEST PRQE 2 



LOG OBJ 



SEQ 



SOURCE STATEMENT 



0049 4F 
004A C32000 



53 
54 
55 



MOV C, A 
JMP LOOP 
END 



PUBLIC SYMBOLS 



EXTERNAL SVMBOLS 



USER SVMBOLS _ ,_ _ 

CONT1 A 003E LOOP A 0020 LOOPS A 601A RAM A S&m START H W0W 

ASSEMBLV COMPLETE, NO ERRORS 



6/78 
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Ref .#AB117 



insite INTEL * USER S library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 #8080 D3000 □ Other. 



(use additional sheets if necessary) 



CUT-AND-PAST EDITOR (PL/M) 

This program provides cut-and-paste capability to augment the 
MDS-800 ISIS II editor and is nearly as fast as a disk to 
disk copy. 



MDS-800 Development System with floppy disk and full 64K RAM. 
(Can redefine buffer dimension for smaller RAM memory.) 



ISIS II Operating System (SYSTEM LIB and PLM 80 LIB also re- 
quired for linking). 



1. Input file name. 

2. Input text file with insert and block delineators edited iji 



Output file with blocks of data moved around and/or 
deleted (has original input file name.) 
Original input file renamed with „BAK extension. 

For further description see detailed comments in source 
listing which include sample paragraph before and after 
CUTPAS is executed. 



Registers Modified: 



All 



RAM Required: or 32K 

64K [Can configure for 48K, 1 



ROM Required: 



None 



Maximum Subroutine Nesting Level: 
N/A 



Assembler/Compiler Used: 
PL/M 



Programmer: 



Dr. A. J. Spuria 



Company: Bendix Corporation 
Communications DivisioK 



Address: 



City: 



E. Joppa Road 



Towson 



State: 



Maryland 21204 



1 Intel Corporation, 1976 

6/78 



4-554 



Ref .#AB117 



PL/N-89 COMPILER p^ 

ISIJ5--II PL-H-88 V3. 6 COMPILATION OF MODULE CUTPflS 
OBJECT MODULE PLACED IN Fi: CUTPAS. OBJ 
COMPILER INVOKED BV: PLM88 : Fi: CUTPflS. PLM 



/* 

CUT AND PASTE CftPflBILITV TO AUGMENT THE HDS-886 EDITOR. 
THE EDITOR IS USED IN CONJUNCTION HITH THIS PROGRAM TO ALLOW BLOCKS 
OF ASCII DATA TO BE MOVED FROM ONE LOCATION AM) INSERTED AT ONE OR 
MORE DIFFERENT LOCATIONS. THE ORIGINAL DATA HILL BE DELETED FROM THE 
ORIGINAL LOCATION UNLESS AN INSERT COMMAND IS PLACED THERE IF NO INSERT 
COMMANDS ARE GIVEN FOR A BLOCK, IT IS MERELY DELETED AND NOT INSERTED 
ANYWHERE. UP TO 9 LEVELS OF NESTING ARE ALLOWED. 

IN ORDER TO USE CUTPAS IT IS FIRST NECESSARY TO USE THE EDITOR 
TO PLACE AN INSERT-HERE DELINEATOR CHARACTER AND A BLOCK DELINEATOR 
CHARACTER AS THE FIRST TWO CHARACTERS IN THE FILE TO BE CUT AND PASTED 
IN THE FOLLOWING THESE HILL BE ASSUMED TO BE S AND S RESPECTIVELY FOR 
PURPOSES OF ILLUSTRATION. AFTER DEFINING THE DELINEATORS, IT IS NECESSARY 
TO PUT \N BEFORE AND AFTER EACH BLOCK TO BE MOVED AND M EACH PLACE IT 
IS TO BE INSERTED, WHERE N IS ANY ASCII CHARACTER. AFTER EXITING THE 
EDITOR, INVOKE THE CUT AND PASTE CAPABILITY BV: 

CUTPAS :Fi: FILNAM. EXT 

NOTE: THERE MUST BE EXACTLY i BLANK AFTER CUTPAS. THE :F1: MUST BE OMITTED 
IF THE FILE IS ON DRIVE 9. THE FILE EXTENSION EXT CANNOT BE TMP OR BAK. THE FILE 
FILNAM. EXT HILL BE RENAMED FILNAM. BAK UPON COMPLETION AND THE CUT-AND-PASTED 
FILE HILL BE NAMED FILNAM. EXT. THIS PROGRAM REQUIRES A 
65,536 MDS MEMORY COMPLEMENT SINCE THE HHOLE INPUT FILE IS HANDLED IN RAM 
TO MINIMIZE DISK ACCESS. THE LARGEST FILE THAT CAN BE CUT AND PASTED IS 
48,688 CHARACTERS INCLUDING M AND SN MARKERS. 

THE FOLLOHING PARAGRAPH ILLUSTRATES THE USE OF THE MARKERS 
IN A FILE TO BE CUT AND PASTED. IT ALSO ILLUSTRATES THE USE OF NESTED BLOCKS 
ALTHOUGH THIS CAN BECOME QUITE COMPLICATED: 

PARAGRAPH BEFORE USING CUTPAS: 

82UTHIS SENTENCE HILL BE MOVED TO THE MIDDLE OF THE PARAGRAPH. USX 
THIS SENTENCE HILL BE DELETED. 

SXS2PART OF THIS SENTENCE SXHILL BE DELETED, PART SXHILL BE MOVED TO B 
S3THE END OF THE PARA6RAPHS3AND THE HHOLE SENTENCE EXCEPT FOR THE DELETED 
PART HILL APPEAR AT THE START OF THE PARAGRAPH. S2 

a 

NOTE THAT THE USER MUST KEEP TRACK OF CARRIAGE RETURNS AND LINE FEEDS 
AND PLACE HIS BLOCK DELINEATORS RESPECTIVELY. 

PARAGRAPH AFTER USING CUTPAS: 

PART OF THIS SENTENCE HILL BE MOVED TO THE END OF THE PARAGRAPH 
AND THE HHOLE SENTENCE EXCEPT FOR THE DELETED 
PART HILL APPEAR AT THE START OF THE PARAGRAPH 
THIS SENTENCE HILL BE MOVED TO THE MIDDLE OF THE PARAGRAPH 
NOTE THAT THE USER MUST KEEP TRACK OF CARRIAGE RETURNS AMD LINE FEEDS 

6/78 4-556 



PL/M-88 COMPILER 



PAGE 2 



2 

2 

4 

5 

6 

7 

8 

9 

19 

11 

12 

13 

14 

15 

16 

17 

18 

19 

28 

21 

22 

23 
24 
25 
26 
27 
28 
29 
39 
31 
32 
33 
34 
35 
26 



AND PLflCE HIS BLOCK DELINEATORS RESPECTIVELY. 
THE END OF THE PARAGRAPH. 

ERROR NUMBERS REPORTED ARE flS FOLLOWS: 

181=ERR0R IN READING :CI: TO GET FILE NAME 

102=ERROR IN OPENING INPUT FILE 

183=ERROR IN OPENING OUTPUT FILE 

104=ERROR IN READING INPUT FILE 

185=ERR0R IN WRITING OUTPUT FILE 

106=ERROR IN CLOSING INPUT FILE 

107=ERROR IN CLOSING OUTPUT FILE 

108=ERROR IN RENAMING :F1:FILNAM.EXT TO :F1:FILNMIBRK 

109=ERROR IN RENAMING :F1:FILNAM.TMP TO :F1:FILNAM.EXT 

196=F0UND END OF FILE MARK WHILE SEARCHING FOR SEGMENT TO INSERT 

197=F0UND END OF FILE MARK WHILE SEARCHING FOR END OF A BLOCK 

198=NESTING DEEPER THAN 9 LEVELS 

199=INPUT FILE LARGER THAN 15,560 CHARACTERS 
ERROR NUMBERS 191 TO 109 ARE FOLLOWED BY THE CORRESPONDING ISIS II ERROR NUMBER 
*/ 

CUTPAS: DO; 
$INCLUDE<:F1:ABBREV> 
DECLARE AS LITERALLY 'LITERALLY'; 
DECLARE DCL AS 'DECLARE'; 
Da PROC AS 'PROCEDURE'; 
DCL PUB AS 'PUBLIC; 
Da EXT AS 'EXTERNAL'; 
Da STR AS 'STRUCTURE'; 
Da ADR AS 'ADDRESS'; 
Da CSR1 AS '29H'; 
Da CSR2 AS '28H'; 
Da RELAYS AS '21H'; 
Da PASSB AS '22H'; 
Da RESULT AS '23H'; 
Da T2L0W AS '2CH'; 
Da T2HIGH AS '2DH'; 
Da IN AS 'INPUT'; 
Da OUT AS 'OUTPUT'; 
Da RET AS 'RETURN'; 
Da EN AS 'ENABLE'; 
Da DIS AS 'DISABLE'; 
Da POP AS 'STACKPTR=STACKPTR+2'; 
Da RTI AS 'DO; ENABLE; RETURN; END;'; 

/♦BUFLEN MUST BE MODIFIED FOR SMALLER MEMORY CONFIGURATIONS*/ 
Da BUFLEN AS '48010'; 
Da BUFFER(BUFLEN)BYTE; 

Da (ACTUAL, STATUS, AFTttN, AFT$OUT, M, BUFPTR, START, COUNDADR; 
Da BUFBYT BASED BUFPTR BYTE; 
Da (LEVEL N,AT$SIGN,BACK$SLA5H)BVTE; 

Da I ADR; 

Da STAK(li)STR(START ADR,N BYTE); 

Da ORIGNAME(15)BYTE; 

Da NEHNAME(15)BYTE; 

Da BACKNAME(15)BYTE; 

Da BLANK AS '20H'; 

Da CR AS '13'; 

Da PERIOD AS '2EH'; 

Da EOFIMARK AS '4'; 
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37 1 Da CHECKISTATUS AS 'IF STATUSC8 THEN DO;CflLL ERROR(M); CALL ERROR(STATUS); CALL EXIT; END'; 

38 1 OPEN: PROC<AFT,F,ftCC,MQDE,S)EXT; 

39 2 Da<AFLF,ACC,MODE,S)ADR; 
48 2 END OPEN; 

41 i CLOSE: PRQCfflFL S)EXT; 

42 2 DCL (AFLS)ADR; 

43 2 END CLOSE; 

44 i REM): PROC(AFLBUF,CNT,ACLS)EXT; 

45 2 Da (AFLBUF,CNT,ACLS)ADR; 

46 2 END READ; 

4? 1 WRITE: PROCCAFL BUF, CNT, S)EXT; 

48 2 Da <AFLBUF,CNLS)ADfc 

49 2 END WRITE; 

56 i RENAME: PROC<OLD, NEW, S)EXT; 

51 2 DCL <OLD,NEHS)ADR; 

52 2 END RENAME; 

53 1 DELETE: PROC(NfiME, S)EXT; 

54 2 Da(NAME,S)ADR; 

55 2 END DELETE; 

56 1 EXIT: PROC EXT; 

57 2 END EXIT; 

58 1 ERROR: PROC<ERRNUM)EXT; 

59 2 Da ERRNUM ADR; 

68 2 END ERROR; 

/♦READ :CI: TO GET FILE NAME*/ 

61 1 CALL READ<L . BUFFER, 128, . ACTUAL, . STATUS); 

62 1 M=18LCHECK*STATUS; 

/*OPEN :F1:FILNAM.EXT FOR INPUT*/ 

69 1 CALL OPEN(. AFTIIN, . BUFFER, L 6, . STATUS); 
78 1 M=182;CHECK$STATUS; 

/♦SAVE ORIGINAL FILE NAME*/ 

77 1 CALL M0VEC15, . BUFFER+L . ORIGNAME); 



/♦SETUP OUTPUT FILE NAME IN NEMNAME AND BACKUP FILE NAME IN BACKNAME*/ 

78 1 DO 1=2 TO 11; 

79 2 IF (BUFFER(I)=6LANK) OR (BUFFER(I)=CR) THEN BUFFER(I)=PERIOD; 
81 2 IF BUFFER(I)=PERIOD THEN GO TO OPENttUT; 

83 2 END; 

84 1 OPENIOUT: BUFFER(I+l)='T';BUFFER(I+2)='M';BUFFER(I+2)='P';BUFFER(I+4)=BLANIO 

88 1 CALL M0VE(15, . BUFFER+L . NEMNAME); 

/*SETUF BACKUP FILE NAME IN BACKNAME*/ 

89 1 6UFFER(I+1)= B';BUFFERa+2)='A';BUFFER(I+3)='K'; 
92 1 CALL M0VEC15, . BUFFER+L . BACKNAME); 

/♦OPEN FILE :F1:FILNAM. TMP FOR OUTPUT*/ 
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93 1 CflLL OPEN(. AFTttUT, . NEHNAHE, 2, 8, . STATUS); 

94 1 H=183; CHECK*STftTUS; 

/♦REfiD WHOLE INPUT FILE INTO BUFFER*/ 

181 1 BUFPTR=. BUFFER; 

102 1 READ$IN. CflLL REflDWTlIN, BUFPTR, 123, . ACTUAL, . STATUS), 

183 1 H=104;CHECK*STATUS; 

118 1 IF ACTUAL028 THEN GO TO STARTISEARCH; 

112 1 BUFPTR=BUFPTR+128; 

/♦CHECK FOR FILE LARGER THFIN BUFFER SIZE*/ 

113 1 IF BUFPTR>. BUFFER(BUFLEN-132)THEN 

114 1 DO; 

115 2 CflLL ERR0R(199); 

116 2 CflLL EXIT; 

117 2 END; 

118 1 GO TO READttN; 

/*SETUP SEflRCH PflRftMETERS AND PUT END OF FILE HARK AT END OF BUFFER*/ 

119 1 START$SEARCH: STRRT=. 6UFFER+2; 

120 1 AT$SIGN=BUFFER<8); 

121 1 BACK*SLASH=BUFFER(1); 

122 1 BUFPTR=6UFPTR+ACTUAL, 

123 1 BUFBVT=EOF«MflRIO 

124 1 LEVEL=0; 

/♦START SEflRCH FOR §, \ OR END OF FILE MARK*/ 

125 1 SEflRCH: 6UFPTR=START; 

126 1 DO 1=0 TO BUFLEN, 

127 2 IF (BUFBVT=AT$SIGN) OR (BUFBVT=BACK*SLASH) OR (BUFBVT=EOF*HARK) 

THEN GO TO HRITE*OUT; 
129 2 BUFPTR=BUFPTR+1; 
138 2 END; 

/♦WRITE STUFF OUT UP TO MARKER FOUND*/ 

13'L 1 WRITE*OUT: C0UNT=6UFPTR-START; 

132 1 CALL HRITE(AFT*OUT, START, COUNT,. STATUS); 

133 1 11=185; CHECK$STATUS; 

/♦NOW PROCESS INTERVAL DEPENDING ON BARKER FOUND*/ 

140 1 IF BUFBVT=EOF«*lRK THEN GO TO RENAME*FILES; 
142 1 IF BUFBVT=ATISIGN THEN GO TO INSERT*STUFF, 

/♦IF BUFBVT=BACK$SLHSH THEN PROCESS AS FOLLOWS*/ 

144 1 BUFPTR=BUFPTR+1; 

/♦IF AT LEVEL 8 THEN SKIP SN. . . \N BLOCK*/ 

145 1 IF LEVEL=0 THEN GO TO SKIP*6L0CK; 

/♦AT LEVED8, SKIP BLOCK! \N. . . SN IF AND ONLV IF N DOES NOT CORRESPOND 
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WITH m FOR THE PREVIOUS LEVEL*/ 

147 i IF BUFBVTOSTftK(LEVEL-l). N THEN GO TO SKIP*BLOCK; 

/♦FOUND ENDING SN, SO DECREI€NT LEVEL CTR AND START SEARCHING 
AFTER m*/ 

149 1 LEVBXEVEL-1; 

158 1 START=STAK(LEVEL). START; 

151 1 60 TO SEARCH; 

/*T0 SKIP BLOCK, POINT TO CHAR FOLLOWING ENDING SN*/ 

152 1 SKIPfBLOCK: N=BUFBVL 

153 1 DO 1=1 TO BUFLEN; 

154 2 BUFPTR=BUFPTR+1; 

155 2 IF 6UFBYT=E0F*MfiRK THEN 

156 2 DO; CALL ERR0R<197>; CALL EXIT; END; 

160 2 IF BUFBVTOBACK*SLASH THEN GO TO END«L00P; 

162 2 BUFPTR=BUFPTR+1; 

163 2 IF BUFBVT=N THEN 60 TO GOT$N; 

165 2 ENDNLOOP: END; 

/*NOH 60 START SEARCHING FOR NEXT MARKER*/ 

166 1 GOT*N: START=6UFPTR+1; 

167 1 GO TO SEARCH; 

/♦INSERT STUFF FROM SN. . . SN INTO 0N POSITION*/ 

/♦SAVE START AFTER ®i AND SAVE N ON STAK AND INCR LEVEL CTR*/ 

168 1 INSERTISTUFF: BUFPTR=BUFPTR+1; 

169 1 STAK(LEVEL). START=BUFPTR+1; 

170 1 STAK(LEVEL).N,N=BUFBVT; 

171 1 LEVEL=LEVEL+1; 

172 1 IF LEVED16 THEN D0;CALLERR0R(198);C«1 EXIT; END; 

/♦FIND SEGMENT SN. . . SN*/ 

177 1 BUFPTR=. BUFFER+2; 

178 1 DO 1=0 TO BUFLEN; 

179 2 IF BUFBVT=EOF$MARK THEN 

1W 2 DO; CALL ERR0RO36); CALL EXIT; END; 

184 2 IF BUFBVTOBACKtSLASH THEN GO TO END$L00P2; 

186 2 BUFPTR=BUFPTR+1; 

187 2 IF BUFBVT=N THEN 60 TO 60T$SEGj 

189 2 ENDL00P2: 6UFPTR=BUFPTR+1; 

190 2 END; 

/♦FOUND SEGMENT. . . NOW 60 SEARCH FOR NEXT MARKER*/ 

191 1 GQTSSEG. START=6UFPTR+1; 

192 1 GO TO SEARCH; 

/♦REACHED END OF FILE. . . CLOSE OUT FILE AND RENAME THEM*/ 

193 1 RENAMEtFILES: CALL CLOSE (AFT* I N, . STATUS); 

6/78 4-560 



t/M-8 


* CCKf ILER 


194 


1 


11=186; CHECKISTATUS; 


291 


1 


CflLL CLOSE<AFT*OUL . STATUS); 


262 


1 


(1=187; CHECKtSTATUS, 


289 


1 


CflLL DELETEC BACKNAME, . STATUS); 


218 


1 


CflLL RENAMED ORIGNAME, . BACKNAME, . STATUS) 


211 


1 


M=188;CHECK$STATUS; 


216 


1 


CALL RENAMEC. NEHNAML. ORIGNAML. STATUS), 


219 


1 


M=189;CHECK*STATUS; 


226 


1 


CALL EXIT; 


227 


1 


END CUTPAS; 
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MODULE INFORMATION: 

CODE AREA SIZE = 8585H 12850 
VARIABLE AREA SIZE = 66EEH 48118D 
MAXIMUM STACK SIZE = 8688H 8D 
289 LINES READ 
8 PROGRAM ERROR(S) 

END C)F PL/M-88 COMPILATION 
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■ ■_■_ TM 

insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
'arameters 



Output 
Results 



□ 4004/40 D8008 I3J8O8O D8048 D8085 D3000 D Other. 



(use additional sheets if necessary) 



Hewlett Packard Calculator to MDS800 I/O Control Program-HPIO 

This program inputs and outputs data and instructions between 
Hewlett Packard 9815 programmable calculator and MDS 800 
memory . 



RS2 32 interface for HP I/O. 

TTY with current loop interface for program control. 



MDS Monitor 



To output to the HP calculator, data and instructions must be 
in memory starting at 7000H (relocatable if desired) . 



When inputting from HP calculator, memory will be load with 
data and instructions starting at 7000H (relocatable if 
desired) . 



Registers Modified: 
A,C,D,E,H,L 


Programmer: 
John E. Kiesling 


RAM Required: 100D - Program + 
Data Storage Space 


Company: 

Quality Measurement Systems 


ROM Required: 

MDS-Monitor 


Address: 
2555 Baird Road 


Maximum Subroutine Nesting Level: 
1 


City: 

Penfield, 


Assembler/Compiler Used: 

8080/8085 Assembler VI. 


State: 

New York 14526 



"j Intel Corporation. 1976 
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ISIS- 1 1 8986/8085 MACRO ASSEMBLER, V2. 



HPIO 



PAGE 



LOC OBJ 



5098 
00F7 
F883 
F809 



5000 210070 



5003 16FF 

5005 3E81 

5007 320300 
500A 3E05 
500C D3F7 
500E CD03F8 
5811 4F 
5012 3E07 
5014 D3F7 
5016 3E80 
5018 320308 

501B 71 



501C 3EB1 
581E B9 



501F CA2C50 
5822 23 



5023 3E0O 

5025 BA 

5026 CA3450 
5829 C30550 
502C 1600 



502E 1E02 



SEQ 

1 
2 
3 
4 
5 
6 
7 
8 
9 

10 

11 
12 

13 
14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

3-3 

34 

35 

36 

37 

38 

3: y 

40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
58 



SOURCE STATEMENT 



CRTC 
CI 

CO 



NAME 

ORG 

EQU 

EQU 

EQU 



HPIO 

5000H 

8F7H 

0F803H 

0F809H 



6 .; ******************************************************* 
INPUT DATA FROM HEWLETT PACKARD 9815 CALCULATOR 



; *********************** +!+:++ 

START1: LXI H, 7000H 



START : 



ENDF 



MVI 

MVI 

STA 

MVI 

OUT 

CALL 

MOV 

MVI 

OUT 

MVI 

STA 

MOV 



MVI 



D, 0FFH 

A, 81H 

03H 
A, 5H 
CRTC 
CI 
C, A 
A, 7H 
CRTC 
A, 88H 
03H 

M, C 



MVI 


A, 0B1H 


CMP 


C 


JZ 


ENDF 


I NX 


H 


MVI 


A, 00H 


CMP 


D 


■JZ 


CK 


JMP 


START 


MVI 


D.. O0H 



E, 02H 
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********************* 3+!!+ ; !< i, tt jJ(, t „ 4 , 

;SET H AND L TO 

; THE BEGINNING OF THE 

.; PROGRAM STORAGE SPACE 

.:REG D IS THE CHECK 

;SUM FLAG 

i TRANSFER 10 CONTROL 

■> TO RS232 PORT 

j SEND READV FOR DATA 

i SIGNAL 

:■ INPUT DATA FROM HP 

; MOVE NEW DATA IN REG C 

; SEND MDS BUSV SIGNAL 



i TRANSFER 10 CONTROL 
.: BACK TO TTV 

STORE NEW DATA IN 

MEMORY SRACE DESIGNATED 

SPACE DESIGNATED BV 

BV H AND L 

.= IF NEW DATA = Bl 
; <CODE FOR END> 
.: GO TO ENDF 



■> H AND L NOW POINT 
; TO THE NEXT STORAGE 
.: SPACE 

J IF D = 00 GO TO CK 



; SET REG D = 00 TO 

i INDICATE TWO BVTES OF 

.; DATA MUST BE PICKED UP 

i THESE BVTES ARE THE 

; CHECK SUM INFO 

.: SET REG E = 2 

; THIS MAKES SURE THAT 

:■ THE CHECK SUM IS 

.PICKED UP 4 _ 565 
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HP 10 



PAGE 



LOC OBJ 

5030 23 

5031 C30550 
5034 ID 



5035 C2O550 

5038 00 

5039 C7 



SEQ 



SOURCE STATEMENT 



600W 

6000 210070 



6003 16FF 



6007 320^:00 

6O0A 4E 
600B 23 

600C 3E01 
600E 320300 

6011 DBF7 
6013 E681 

6015 C21160 
6018 CD09F8 
601B 3EB1 
601D B9 



601E CA2A60 
6021 3E00 

6023 BA 

6024 CA3160 
6027 C 30560 
602A 1E02 



602C 1609 



602E C30560 
6031 ID 



54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

7iil 

73 
74 
75 
76 
f'7 
78 
79 
80 
81 

84 
•-••=; 

86 
87 
88 
89 
90 
91 
92 
93 
94 
95 
96 
97 



99 

100 
101 
102 

103 
104 
105 
106 
107 



CK: 



DONE : 



I NX 
,TMP 
DCR 



JNZ 
NOP 
RST 



H 
START 

E 



START 







.; IF REG E = ALL 

; BYTES ARE NOW IN 

.; THEREFORE THE ROUTINE 

.; IS DONE 



■ OUTPUT DATA TO HEWLETT PACKARD 9815 CALCULH Tuk 

■ :+::+:* + + * + * + *** + ** + + + + + ** + * + + * + + * + + *** + + * 



STARTi 



5TART3 



BCK 



ENDF1 



ORG 
LXI 



MVI 



MVI 
STA 

MOV 
INK 

MV I 
STA 

IN 
AN I 

JNZ 
CALL 
MVI 
CMP 



JZ 

MV I 

CMP 

JZ 

JMP 

MVI 



CK1 : 



MV I 



JMP 
DCR 



6Q&Bh 
Hj i-'wW-i 



D, OFFH 



A. yOH 

03H 

C, M 
H 

A. 01H 
03H 

CRTC 
81H 

BCK 

CO 

A, 0B1H 



ENDF1 
A, 00H 
D 

CK1 

STARTS 
E, 02H 



D, OOH 



start: 

E 



SET H AND L TO THE 
BEGINNING OF THE 
DATA TO BE OUTPUT 

- SET D = FFH 

; REG D IS THE CHECK SUM 

; FLAG 

; TRANSFER 10 CONTROL TO 

: TTV 

: MOVE DATA INTO REG C 
;H AND L NOW POINT TO 
; THE NEXT PIECE OF DATA 

.; TRANSFER 10 CONTROL TO 
; RS232 INTERFACE 

.iWAIT FOR DEVICE TO BE 
.; NOT BUSV 

.; OUTPUT DATA 

i IF DATA = B1H CCODE 
; FOR END > GO TO 
; ENDF1 



IF REG D = 00 GO TO CK1 



SET REG E = 2 
THIS COUNTER WILL MAKE 

SURE THE LAST TWO BVTES 
; < CHECK SUM NUMBERS > 
; AFTER THE END 
: ARE PICK. UP 
i SET REG D = 00 TO FLAG 
iTHAT THE NEXT BVTES ARE 
; CHECK SUM BVTES 



IF REG E = ALL 
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HPIO 



PAGE 



LOC OBJ 



SEQ 



SOURCE STATEMENT 



6032 C20560 
6035 3E81 
6037 320308 
603A 00 
603B C7 



5808 
PUBLIC SVMBOLS 



> DATA HAS BEEN OUTPUT 



108 

109 JNZ START3 

110 DONE1: MVI A, 01H 

111 STA 03H 

112 NOP 

113 RST 8 

114 i ******************************^^ 

115 i 

116 ; 

117 ; 

118 i ******-**-****-M 

119 END 5000H 



END 



EXTERNAL SVMBOLS 



USER SVMBOLS 

6CK A 6011 CI 

DONE1 A 6035 ENDF 



A F883 
A 582C 



CK 
ENDF1 



A 5834 
A 682A 



CK1 A 6831 
START A 5885 



CO A F88 
START1 A 588 



ASSEMBLV COMPLETE, NO ERRORS 
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Ref .# AB119 

inSltg INTEL@ USERS LIBRARY SUBMITTAL FORM 



Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 88080 D8048 D8085 DOthe 



. (use additional sheets if necessary) 



Program 

Title I HP - Controller for Hewlett-Packard 9871A Printer 



To interface a Hewlett-Packard 987 1A Printer to an 
Intel MDS-800. 



Intel MDS-800 
Intel SBC-508 

Hewlett-Packard 987 1A 



MDS Monitor V2.0 
MDS Boot V2.0 
ISIS-II V2.2 

C-Register contains character for output by printer 
Printer status on port 0DFH 



Character to be printed appears on port 0DFH 
Printer control on port 0DEH 

This program outputs characters to the HP 9871A printer usinq 
the handshake routine described in Chapter Two of the 
•Hewlett-Packard 987 1A Printer Operating and Service Manual'. 
This manual is Hewlett-Packard Part Number J09871-9//J3/). 



Available on 
diskette only. 



Registers Modified: 
All 



RAM Required: 

0B3H for Loader; 69H for Driver 



ROM Required: 

None 



Maximum Subroutine Nesting Level: 

iEwo- 



Assembler/Compiler Used: 
ISTS-TT PT./M Rfi v^.ft 



Programmer: 
Carl Ow enby, J r , 



Company: 
Gibson-Owenhy, Tnr-, 



Address: 
Post: Off i no Rnv Q? 3 



City: 

Quincy, 



State: 
Flnrida 3?351 



© Iptel Corporation, 1976 



>gm 



98-034D 
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Five files are required to compile, link, and locate this 
program. They are HPLOD.SRC, HPDRV.SRC, HPLIDR.SRC, 9871A.DAT. 
and HP9871.CSD. 

The HP9871.CSD file must be edited according to the amount of 
memory in the MDS-800 system. For a 16K system, the code 
parameter of the locate command should be changed to 3F.00H. 
For a 32K system, the parameter should be 7E00H; for a 48K 
system it should be 0BE00Ht and should be left at 0F600H 
for a system with 64K of RAM. 

After making any required modification in the Command Sequence 
Definition file as described above, the program may be compiled 
by enterxng the command 'SUBMIT :F1:HP9871.CSD' . This should 
be done with the PL/M 80 compiler disk in Drive J0 and the 
program source files on the disk in Drive 1. 

After compilation the program may be loaded and executed by 
entering the command ' HP • . 

This interface has been operated successfully operated using 
a twenty foot length of thirty-four conductor flat cable 
connected in accordance with the run list in file 9871A.DAT. 
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30JUL77 



Ref.# AB119 
PAGE 1 



ISIS-II PL/M-80 V3.0 COMPILATION OF MODULE HP98 71ALOADER 
OBJECT MODULE PLACED IN :Fl : HPLOD. OBJ 
COMPILER INVOKED BY: PLM80 : Fl :HPLOD. SRC 



$DATE(30JUL77) 

$TITLE( 'HPLOD - HP 9871A LOADER ) 

$PAGEWIDTH(72) 

$PAGELENGTH(57) 

HP$9871A$LOADER: 
DO; 



/* 

THIS PROGRAM EXPECTS THE HEWLETT-PACKARD 9 871A PRINTER 

TO BE INTERFACED IN THE FOLLOWING FASHION TO THE MDS-800. 
V 



$INCLUDE(:F1: 9 871A.DAT) 

/* 

9871A DESCRIPTION 

PIN # 



SBC-508 DESCRIPTION 

PIN # 



3 SI (NOT USED) 

4 SO (NOT USED) 

5 103/ (COVER ON) 
3 TO INPUT PORT 3) 

6 102/ (ABORT) 
2 TO INPUT PORT 3) 

7 101/ (READY) 
1 TO INPUT PORT 3) 

8 100/ (BUFFER SPACE) 
TO INPUT PORT 3) 

9 CMD/ (CONTROL) 

FROM OUTPUT PORT 2) 

10 HLT/ (STOP) 

1 FROM OUTPUT PORT 2) 

11 FLG/ (FLAG) 

5 TO INPUT PORT 3) 

12 CALC7/ 
7 FROM OUTPUT PORT 3) 

13 CALC6/ 

6 FROM OUTPUT PORT 3) 

14 CALC5/ 
5 FROM OUTPUT PORT 3) 

24 POP/ (POWER-ON PRESET) 97 
4 TO INPUT PORT 3) 

25 CHASSIS GROUND 

26 LOGIC GROUND 

27 LOGIC GROUND 

28 CALCO/ 39 
FROM OUTPUT PORT 3) 



91 

92 

89 

90 

27 

26 

98 

51 

36 

53 



I3DAT3/ (DATA BIT 
I3DAT2/ (DATA BIT 
I3DAT1/ (DATA BIT 
I3DAT0/ (DATA BIT 
O2DAT0/ (DATA BIT 
02DAT1/ (DATA BIT 
I3DAT5/ (DATA BIT 
03DAT7/ (DATA BIT 
03DAT6/ (DATA BIT 
03DAT5/ (DATA BIT 
I3DAT4/ (DATA BIT 

O3DAT0/ (DATA BIT 
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30JUL77 



PAGE 



29 



CALC1/ 



1 FROM OUTPUT PORT 3) 



38 03DAT1/ (DATA BIT 



30 






CALC2/ 




50 


03DAT2/ (DATA BIT 


2 


FROM 


OUTPUT 


PORT 3) 






31 






CALC3/ 




37 


03 DAT 3/ (DATA BIT 


3 


FROM 


OUTPUT 


PORT 3) 






32 






CALC4/ 




52 


03DAT4/ (DATA BIT 


4 


FROM 


OUTPUT 


PORT 3) 






33 






LOGIC GROUND 






34 






LOGIC GROUND 






35 






+5V@50 0MA 






PORT 


NUMBER 


ADDRESS 















0DCH 






1 








00DDH 






2 








00DEH 






3 








00DFH 






FLAT 

N 


CABLE 


9871A 


SBC-50 8 


DESCRIPTIO 


WIRE# 






PIN# 


PIN# 




1 












GND 


2 

3 








28 


39 


CALCO/ 












GND 


4 
5 








29 


38 


CALC1/ 












GND 


6 

7 








30 


50 


CALC2/ 












GND 


8 








31 


37 


CALC3/ 


9 












GND 


10 
11 








32 


52 


CALC4/ 
GND 


12 
13 








14 


53 


CALC5/ 
GND 


14 








13 


36 


CACL6/ 


15 












GND 


16 








12 


51 


CALC7/ 


17 












GND 


18 
19 








9 


27 


CMD/ 
GND 


20 








10 


26 


HLT/ 


21 












GND 


22 








8 


90 


100/ 


23 












GND 


24 








7 


89 


101/ 


25 












GND 


26 








6 


92 


102/ 


27 












GND 


28 








5 


91 


103/ 


29 
30 
31 








11 


98 


GND 

FLG/ 

GND 


32 








24 


97 


POP/ 
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PL/M-80 COMPILER HPLOD - HP 9871A LOADER 30JUL77 PAGE 

-,- GND 

33 GND 



3 
= V 

2 1 DECLARE DCL LITERALLY 'DECLARE'; 

3 i DCL AS LITERALLY 'LITERALLY'; 

4 I DCL PROC AS 'PROCEDURE'; 

5 i DCL MEMTOP BYTE AT (0005H) , 

FILE$NAME (* ) BYTE DATA ( 'HPRES ), 
ENTRY ADDRESS, 
STATUS ADDRESS; 

6 1 LOAD : 

PROC ( F ILE ,B I AS, RETSW, ENTRY, STATUS) EXTERNAL; 

7 2 DCL (FILE,BIAS, RETSW, ENTRY, STATUS) ADDRESS; 

8 2 END LOAD; 

9 1 MEMCK : 

PROC ADDRESS EXTERNAL; 

10 2 END MEMCK; 

11 1 CALL MOVE (319,MEMCK+1,MEMCK-511) ; 

12 1 MEMTOP = HIGH (MEMCK - 193) ; 

13 i CALL LOAD (. FILENAME ,0, 1, .ENTRY, . STATUS) ; 

14 l END HP$9871A$L0ADER; 



MODULE INFORMATION: 

CODE AREA SIZE = 004DH 7 7D 
VARIABLE AREA SIZE = 000 4H 4D 
MAXIMUM STACK SIZE = 000 8H 8D 
114 LINES READ 
PROGRAM ERROR (S) 

END OF PL/M-80 COMPILATION 
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PL/M-80 COMPILER HPDRV - HP 9871A DRIVER 30JUL7 7 

ISIS-II PL/M-80 V3.0 COMPILATION OF MODULE HP9871ARESIDENTDRIVER 
OBJECT MODULE PLACED IN :F1 : HPDRV .OBJ 
COMPILER INVOKED BY: PLM80 : Fl : HPDRV. SRC 



$DATE(30JUL77) 

$TITLE ( 'HPDRV - HP 9871A DRIVER') 

$PAGEWIDTH(72) 

$PAGELENGTH(57) 

1 HP$9871A$RESIDENT$DRIVER: 

DO; 

2 1 DECLARE DCL LITERALLY 'DECLARE'; 

3 1 DCL AS LITERALLY 'LITERALLY'; 

4 1 DCL PROC AS 'PROCEDURE'; 

5 1 DCL PRINTER$CONTROL AS '0DEH' f 

CONTROL$LINE$HIGH AS '0 '; 

6 1 EXIT: 

PROC EXTERNAL; 

7 2 END EXIT; 

8 1 IOCHK : 

PROC BYTE EXTERNAL; 

9 2 END IOCHK; 

10 1 IOSET: 

PROC (STATUS) EXTERNAL; 

11 2 DCL STATUS BYTE; 

12 2 END IOSET; 

13 1 IODEF: 

PROC (DEVICE, LOCATION) EXTERNAL; 

14 2 DCL DEVICE BYTE, 

LOCATION ADDRESS; 

15 2 END IODEF; 

16 1 LIST$DRIVER: 

PROC (CHARACTER) EXTERNAL; 

17 2 DECLARE CHARACTER BYTE; 

18 2 END LIST$DRIVER; 

19 1 OUTPUT (PRINTER$CONTROL) = 

CONTROL$LINE$HIGH; 



PAGE 



20 1 

21 1 



CALL IODEF (6 , .LIST$DRIVER) ; 

CALL IOSET (IOCHK AND 0011$1111B OR 1100$0000B); 
22 1 CALL EXIT; 
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PL/M-80 COMPILER HPDRV - HP 9871A DRIVER 



30JUL77 



PAGE 



23 1 



END HP$9871A$RESIDENT$DRIVER; 



MODULE INFORMATION: 

CODE AREA SIZE = 01FH 
VARIABLE AREA SIZE = 000 OH 
MAXIMUM STACK SIZE = 0002H 
49 LINES READ 
PROGRAM ERROR (S) 

END OF PL/M-80 COMPILATION 



3 ID 
0D 
2D 
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PL/M-80 COMPILER HPLIDR - HP 9871A LIST DRIVER 30JUL77 PAGE 1 

ISIS-II PL/M-80 V3.0 COMPILATION OF MODULE HP9871ALISTDRIVER 
OBJECT MODULE PLACED IN :F1 :HPLIDR.OBJ 
COMPILER INVOKED BY: PLM80 : Fl :HPLIDR.SRC 



$DATE(30JUL77) 

$TITLE ( 'HPLIDR - HP 9871A LIST DRIVER') 

$PAGEWIDTH(72) 

$PAGELENGTH(57) 

1 HP$9871A$LIST$DRIVER: 

DO; 

2 1 DECLARE DCL LITERALLY 'DECLARE'; 

3 1 DCL AS LITERALLY 'LITERALLY'; 

4 1 DCL PROC AS 'PROCEDURE'; 

5 1 DCL PRINTER$STATUS AS 'ODFH', 

CHARACTER$OUTPUT$PORT AS 'ODFH', 
PRINTER$CONTROL AS 'ODEH', 
CONTROL$LINE$LOW AS '01H', 
CONTROL$LINE$HIGH AS '0 ', 

PRINTER$NOT$READY AS 'NOT ROR (INPUT (PRINTERSSTAT 
- US),1)', 

FLAG$IS$LOW AS 'NOT ROL (INPUT (PRINTER$STATUS) , 3) 



LIST$DRIVER: 

PROC (CHARACTER) PUBLIC; 
DCL CHARACTER BYTE; 

DO WHILE PRINTER$NOT$READY; 
END; 

OUTPUT (CHARACTER$OUTPUT$PORT) = CHARACTER; 

OUTPUT (PRINTER$CONTROL) = CONTROL$LINE$LOW; 

DO WHILE FLAG$IS$LOW; 
END; 

OUTPUT (PRINTER$CONTROL) = CONTROL$LINE$HIGH; 
END LIST$DRIVER; 
END HP9871A$LIST$DRIVER; 



MODULE INFORMATION: 

CODE AREA SIZE = 0028H 40D 



6 


1 


7 


2 


8 
9 


2 
3 


10 


2 


11 


2 


12 
13 


2 
3 


14 


2 


15 


2 


16 


1 
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PL/M-80 COMPILER HPLIDR - HP 9871A LIST DRIVER 30JUL7 7 PAGE 

VARIABLE AREA SIZE = 0001H ID 
MAXIMUM STACK SIZE = 0000H OD 

40 LINES READ 

PROGRAM ERROR (S) 

END OF PL/M-80 COMPILATION 
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insit£ 



Ref.#AB120 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



□ 4004/4040 D8008 dWo D8048 D8085 D Other. 



. (use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



input 
Parameters 



Output 
Results 



Print text for SBC 80/10 

To print text and numerical data on a teletype 
with spacing inserted as desired. 



SBC 8080 >^8odo) 



SBC 80P Monitor 



Text (ASCII), Numeric data (FPU format) and output 
buffer address and length. 



The text will be output with spacing inserted as desired 
followed by optional output of numeric data. A check 
is made to insure that the buffer is not overflowed. 



Registers Modified: 



ALL 



RAM Required: , < . . 

■ 61 bytes 



ROM Required: 



None 



Maximum Subroutine Nesting Level: o 



Assembler/Compiler Used: PDP-11 



Programmer: 



Doug Heere 



Company: ppG Industr i es 



Address: 



Box 400 



City: Wichita Falls 



State: Texas 76307 



© Intel Corporation. 1976 
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98-0340 

4-580 



ASM80 : Fl : PRDRT. SRC 



Ref.#AB120 



ISIS-II 8080/8685 MACRO ASSEMBLER, V2. 



MODULE PAGE 



LOC OBJ 



SEQ 



SOURCE STATEMENT 
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1 
2 
3 
4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 



PROGRAM PRDAT 

THIS PROGRAM IS DESIGNED TO PRINT DATA ON A 
TELETYPE. THE DATA IS A MIXTURE OF TEXT AND NUMERIC 
DATA. VARYING LENGTH MESSAGES ARE LOADED FROM PROM 
OR RAM AREAS INTO AN OUTPUT BUFFER IN RAM. THE 
NUMERIC MUST PREVIOUSLY HAVE BEEN LOADED INTO A 
BUFFER IMMEDIATELY FOLLOWING THE OUTPUT BUFFER. 
THE NUMERIC DATA IS IN FLOATING POINT UNIT FORMAT. 

THE PRINT PROGRAM ALLOWS THE INSERTION OF SPACES 
IN THE TEXT AND CONTROL OF PRINTING BOTH TEXT AND 
NUMERIC DATA, OR TEXT ONLY. AS THE TEXT IS LOADED 
BY THE PROGRAM, IT IS CHECKED FOR SPACING CHARACTERS 
<81H - 0CH> AND PRINT CONTROL CHARACTERS COFEH, 0FFH> 
WHEN A SPACING CHARACTER IS FOUND, THE EQUIVALENT 
NUMBER OF SPACES IS INSERTED INTO THE OUTPUT BUFFER. 
THE PRINT CONTROL CHARACTER IS THE LAST CHARACTER IN 
THE TEXT. A VALUE OF 0FEH CAUSES ONLY THE TEXT TO BE 
PRINTED, WHILE A VALUE OF OFFH CAUSES OUTPUT OF THE 
NUMERIC DATA FOLLOWING THE TEXT. 

THE FOLLOWING EXAMPLE SHOWS THE BUFFER RELATIONSHI 
AND TEXT STRING SETUP. MESS1 WILL OUTPUT ONLY THE 
TEXT '■ TEXT1 ', WHILE MESS2 WILL CAUSE OUTPUT 
OF THE TEXT ' TEXT2 ' FOLLOWED BY NUMERIC 
DATA PREVIOUSLY LOADED IN THE ANSWER BUFFER. 



OUTPUT BUFFER 
30 BYTES 
NUMERIC DATA 
17 BYTES 

CARRIAGE RETURN 

4 SPACES 
TEXT 

3 SPACES 

PRINT CONTROL, TEXT ONLY 

TEXT 

5 SPACES 

PRINT CONTROL, TEXT AND 



THE LENGTH OF THE BUFFER IS INPUT TO THE ROUTINE F 
OVERFLOW CHECKING. IF THE TEXT AS EXPANDED OVERFLOWS T 
BUFFER, IT IS TRUNCATED. 



OUTBF 


SET 


* 




DS 


30 


ANSWR 


SET 


$ 




DS 


17 


MESS1 : 


DB 


ODH 




DB 


04H 




DB 


'TEXT1 




DB 


03H 




DB 


0FEH 


MESS2 : 


DB 


'TEXT2 




DB 


05H 




DB 


OFFH 



INPUT ARGUMENTS: 

REG C 

REG D&E 
REG H&L 

REGISTERS DESTROYED: ALL 



LENGTH OF OUTPUT BUFFER (NO 

INCL ANSWER BUFFER ) 
ADDRESS OF OUTPUT BUFFER 
ADDRESS OF TEXT 

4-582 



I SIS- 1 1 8080/8085 MACRO ASSEMBLER, V2. 



MODULE PAGE 



LOC OBJ 

4400 
01F9 



4400 

4400 D5 

4401 CD1C44 
4404 El 



4405 47 

4406 C5 



4407 1600 
4409 CD5644 
440C CI 



440E FEFF 
4410 C0 



4411 23 

4412 OD 

4413 F21144 



4416 1620 
4418 CD5644 
441B C9 



SEG SOURCE STATEMENT 

i MONITOR ROUTINES USED: ECHO 

ORG 4400H 

ECHO EQU 01F9H i MONITOR ROUTINE 

':. MAIN PROGRAM ENTRV POINT 
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53 
54 
55 
56 

57 
58 
59 
60 
61 
62 
63 
64 
65 
€€- i 

67 ; 

68 i 

69 j 
70 
71 

72 . 

73 . 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
85 
86 
87 
88 
89 
90 
91 
92 
93 
94 
95 
96 
97 
98 
99 

100 

101 
102 
103 
104 
105 
106 
107 



PRDAT SET * 
PUSH D 
CALL LDTXT 
POP H 



SAVE OUTPUT BUFFER ADDRESb 
LOAD FIXED TEXT TO BUFFER 
GET OUTPUT BUFFER ADDRESb 



la-^t CHARACTER IN FIXED TEXT < PRINT CONTROL > IS RETUR 
IN ACCUMULATOR BV LDTXT. SAVE IT FOR LATER 



MOV B, A 
PUSH B 



PUT LAST CHAR IN REG B 
SAVE B AND C 



REGISTER C CONTAINS NUMBER OF SLOTS IN BUFFER NOT FILE 
BV FIXED TEXT. THIS IS USED TO LOCATE ANbWER BUFFER 

niJTPIIT ROUTINE SEARCHES FOR ENDING CHARACTER. IF PRINT 
THIS IS A ZERO, IF PRINTING FPU NUMERIC DATA IT lb H b 



MVI D, 0OH 
CALL OUTPT 
POP B 
MOV A, B 



LOAD TEXT END CHARACTER FOR C 
PRINT TEXT 

RECALL PRINT CONTROL AND EMPT 
GET PRINT CONTROL IN ACCUM 



IF PRINT CONTROL IS FE, EXIT- IF FF PRINT ANSWER 



CPI OFFH 
RNZ 



IS CONTROL FF 
NO, FINISHED 



\ LOCATE ANSWER BUFFER BV SKIPPING UNFILLED OUTPUT BUFFE 
.; COUNT IS IN REGISTER C 



ENDBF: I NX H 
DCR C 

JP ENDBF 



INCREMENT POINTER 
REDUCE COUNT 
LOOP UNTIL DONE 



SET END CHARACTER TO SPACE FOR PRINTING FPU DATA 



MVI D, 20H 
CALL OUTPT 
RET 



SET SPACE AS COMPARE CHAR 

PRINT NUMERIC DATA 

EXIT 



\ SUBROUTINE TO LOAD TEXTS FROM FIXED ARE TO OUTPUT BUFF 

: ALSO XPANDS SPACING CODE 

4-583 



lb lb- 1 1 8980/8085 MACRO ASSEMBLER.. V2. 



MODULE PAGE 



LOG OBJ 



441C 
441C OD 
441D 7E 



441E FEOD 
4420 D22B44 



4423 47 

4424 05 

4425 EB 

4426 2620 
4428 23 



4429 OD 
442A CA4544 



442D 05 
442E F22644 



4431 0C 



4432 00 

4433 CA4544 
4436 EB 
443? 23 
4438 C31D44 



443B FEFD 
443D DA5044 
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SEQ 

108 
109 

110 

111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 

124 
125 
126 
127 
128 
129 
130 
131 
122 

134 

135 

136 

13? 

138 

139 

140 

141 

142 

142 

144 

145 

146 

14? 

148 

149 

150 

151 

152 

152 

154 

155 

156 

157 

158 

159 

160 

161 

162 



SOURCE STATEMENT 

INPUT - 

C - BUFFER SIZE 
D&E - OUTPUT BUFFER ADDRESS 
H&L - TEXT ADDRESS 

OUTPUT- 

C - UNSED PORTION OF OUTPUT BUFFER 

LDTXT 
GETCH 

TEST FOR SPACING CHARACTER <0DH 



SET $ 
DCR C 
MOV A, M 



.; ENTRV POINT 

.; ADJUST BUFFER COUNTER 

.: GET TEXT CHARACTER 



CPI 0DH 
JNC LODCH 



IS IT SPACING CHARACTER- 
NO, LOAD IT 



bPACING CHARACTER FOUND, INSERT SPACES IN OUTPUT BUFFE 



MOV B.. A 

DCR B 
XCHG 

SPACE: MVI M, 20H 

I NX H 



.: SET UP COUNTER 

; AND ADJUST IT 

.; POINT H&L TO OUTPUT BUFFER 

.; INSERT SPACE 

.: ADJUST BUFFER POINTER 



CHECK FOR BUFFER OVERFLOW 

DCR C ; 

JZ TRUNC .; 



DECREMENT BUFFER SPACE AVAIL 
IF FULL, TRUNCATE 



LOOP UNTIL REQUIRED NUMBER OF SPACES INSERTED 



DCR B 

JP SPACE 



.: DECREMENT SPACE COUNTER 
; LOOP FOR DESIRED NUMBER 



ADJUST BUFFER COUNTER 

INR C ; ADJUST ROOM IN BUFFER 

CHECK FOR END OF BUFFER AND LOAD NEXT CHARACTER 



NXTCH : DCR C 

JZ TRUNC 
XCHG 
I NX H 
JMP GETCH 



DECREMENT' ROOM IN BUFFER 
IF FULL TRUNCATE 
POINT H&L TO TEXT 
NEXT CHARACTER 
LOAD NEXT CHARACTER 



NON bPACIN CHARACTER FOUND, CHECK FOR PRINT CONTROL 



LODCH 



CPI 0FDH 
JC NOTPC 



IS IT PRINT CONTROL? 
NO, GO LOAD IT 



PRINT CONTROL CHARACTER FOUND, END LOADING 
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IS IS- 1 1 8080/8085 MACRO ASSEMBLER, V2. 



MODULE PAGE 



LOG OBJ 



4440 EB 

4441 3680 

4443 EB 

4444 C9 



4445 EB 

4446 7E 

4447 FEFD 
4449 D24044 
444C 23 
444D C34644 



4450 EB 

4451 77 

4452 23 

4453 C33244 



4456 

4456 7E 

4457 BA 

4458 C8 



4459 4F 
445A CDF901 
445D 23 
445E C35644 



0ADF 
15E5 



4461 



SEQ 

163 
164 
165 
166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 

181 

182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 

201 

202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 
214 
215 
216 
217 



SOURCE STATEMENT 

ENTRY FOR END OF TEXT OR TRUNCATION 

PUT ZERO IN LAST POSITION, RETURN REMAINING BUFFER RUL 

REG C 



ENDCH : XCHG 

MV I M, 80H 

XCHG 

RET 



POINT H&L TO OUTPUT BUFFER 
PUT ZERO IN LAST POSITION 
POINT H&L TO TEXT 
; EXIT 



MESSAGE TRUNCATED, FIND PRINT CONTROL CHARACTER 



TRUNC . XCHG 
LOOPA : MOV A, M 
CPI 0FDH 
JNC ENDCH • 
I NX H 
.JMP LOOPA 



.: POINT TO TEXT 

i GET TEXT CHARACTER 

.; IS IT PRINT CNTRL 

VES, FINISH 

.; NO, POINT TO NEXT CHARACTER 

.; AND CHECK IT 



TEXT CHARACTER, LOAD TO BUFFER 



NOTPC : 



XCHG 

MOV M, A 
I NX H 
.JMP NXTCH 



PniNT TO OUTPUT BUFFER 
LOAD CHARACTER TO BUFFER 
INCREMENT BUFFER POINTER 
GET NEXT CHARACTER 



SUBROUTINE TO PRINT TEXT OR NUMERIC DATA 

INPUT- 

D- CHARACTER TO COMPARE TO TERMINATE PRINT 

H&L- OUTPUT BUFFER 



OUTPT SET * 

MOV A, M 
CMP D 

RZ 



GET CHARACTER 

IS IT END CHARACTER? 

VES, FINISHED 



OUTPUT CHARACTER TO TELETYPE USING MONITOR ROUTINE 



MOV C, A 
CALL ECHO 
I NX H 
JMP OUTPT 



.; PREPARE FOR. OUTPUT 

: OUTPUT CHARACTER 

.; POINT TO NEXT CHARACTER 

.; GET NEXT CHARACTER 



CNASI EQU OADFH 
BINBC EQU 15E5H 



i TEST NORMAL MESSAGE WITH ANSWER 
START SET * • 
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I bib- 1 1 8080/8985 


LOC 


OBJ 


4461 


3E1E 


4463 


11D144 


4466 


213845 


4469 


CD0044 


446C 


3E1E 


446E 


11D144 


4471 


215045 


4474 


CD0044 


4477 


3E1E 


4479 


CD9E45 


447C 


11D144 


447F 


210045 


4482 


CD0044 



MACRO ASSEMBLER, V2. 



MODULE 



PAGE 



4485 


3E1E 


4487 


11D144 


448fl 


216345 


448D 


CD0044 


4490 


3E0fl 


4492 


CD9E45 


4495 


11E544 


4498 


210045 


449B 


CD0044 



449E 


3E1E 


44fl0 


11D144 


44fl3 


217445 


44A6 


CD0044 


44A9 


3E1E 


44AB 


CD9E45 


44AE 


11D144 


44B1 


211345 


44B4 


CD0044 



44B7 


3E1E 


44B9 


11D144 


44BC 


218A45 


44BF 


CD0044 


44C2 


3E1E 


44C4 


CD9E45 


44C7 


11D144 


44CA 


212445 


44CD 


CD0044 



44D0 CF 
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SEQ 

218 
219 
220 

221 

222 

223 

224 

225 

226 

227 

228 

229 

230 

221 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

256 

251 

252 

253 

254 

255 . 

256 . 

257 j 
258 
259 
260 
261 
262 
263 
264 
265 
266 

267 i 

268 .; 

269 .; 
270 

■*"i ™? .i 

272 i 



SOURCE STATEMENT 



MVI 


A; 30 


LXI 


D, OUTB1 


LXI 


H.. HEAD1 


CALL 


PRDAT 


MVI 


A, 30 


LXI 


D, OUTB1 


LXI 


H, STEP1 


CALL 


PRDAT 


MVI 


A, 30 


CALL 


DOIT 


LXI 


D, OUTB1 


LXI 


H, MESS1 


CALL 


PRDAT 



TEST TRUNCATION OF MESSAGE 



MVI 


A, 30 


LXI 


D, OUTB1 


LXI 


H, STEP2 


CALL 


PRDAT 


MVI 


A.. 10 


CALL 


DOIT 


LXI 


D, 0UTB2 


LXI 


H.. MESS1 


CALL 


PRDAT 



SET BUFFER SIZE 

POINT TO BUFFER 

HEADER MESSAGE 

PRINT IT 

RESET BUFFER SIZE 

POINT TO BUFFER 

STEP MESSAGE 

PRINT IT 

SET BUFFER SIZE AT 30 BVTE 

LOAD COUNT IN ANSWER BUFFE 

POINT TO BUFFER 

POINT TO MESSAGE 

PRINT MESSAGE AND ANSWER 



SET BUFFER SIZE 

POINT TO BUFFER 

POINT TO MESSAGE 

PRINT IT 

SET BUFFER LENGTH AT 10 BV 

PUT COUNT IN ANSWER 

POINT TO SHORT BUFFER 

POINT TO MESSAGE 

PRINT MESSAGE 



TEST MESSAGE WITHOUT ANSWER 



MVI A, 30 j 

LXI D, OUTB1 i 

LXI H, STEP3 .; 

CALL PRDAT ; 

MVI A, 30 .; 

CALL DOIT .: 

LXI D, OUTB1 .; 

LXI H, MESS2 .; 

CALL PRDAT .; 

TEST TRUNCATING EXPANSION 



MVI 


A.. 30 


LXI 


D, OUTB1 


LXI 


H, STEP4 


CALL 


PRDAT 


MVI 


A, 30 


CALL 


DOIT 


LXI 


D, OUTB1 


LXI 


H, MESS3 


CALL 


PRDAT 



SET BUFFER SIZE 
POINT TO BUFFER 
POINT TO MESSAGE 
PRINT IT 

SET BUFFER AT 30 BYTES 
LOAD COUNT IN ANSWER 
POINT TO LONG BUFFER 
POINT TO MESSAGE 
PRINT IT 



SET BUFFER SIZE 
POINT TO BUFFER 
POINT TO MESSAGE 
PRINT IT 
SET BUFFER TO 30 BVTES 
LOAD COUNT IN ANSWER 
POINT TO LONG BUFFER 
POINT TO MESSAGE 
PRINT IT 



END OF TEST 
RST 1 
BUFFER AREAS 
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MODULE 



PAGE 



LOG OBJ 



SEQ 



SOURCE STATEMENT 



44D1 

0014 

44E5 

000A 

44EF 

0011 



4500 

4501 

4502 

4506 

450A 

450E 

4511 

4512 

4513 

4514 

4515 

4519 

451D 

4521 

4523 

4524 

4525 

4526 

452A 

452E 

453:2 

4525 

4536 

4537 

4538 

4539 

453A 

453E 

4542 

4546 

454A 

454E 

454F 

4550 

4551 

4555 

4559 

455D 

4561 

4562 

4563 

4564 

4568 

456C 

4570 



0D 

02 

42554646 

4552204C 

454E4754 

48203D 

02 

FF 

0D 

04 

57495448 

4F555420 

414E5357 

4552 

FE 

0D 

02 

5452554E 

43415445 

20535041 

434553 

0A 

0C 

FF 

0D 

06 

54455354 

204F4620 

50524441 

5420524F 

5554494E 

45 

FE 

0D 

20544558 

5420504C 

55532041 

4E535745 

52 

FE 

0D 

20545255 

4E434154 

45442054 

455854 



273 ; 

274 OUTB1 
275 
276 



27a 
279 
280 
281 



SET * 

DS 20 

0UTB2 SET * 

DS 10 

ANSWR SET * 

DS 17 



TEXTS 



MESS1 



284 
285 



286 

287 

288 MESS2: 

289 

290 



291 

292 MESS3: 

293: 

294 



295 

296 

297 

298 HEAD1: 

299 

300 



DB 
DB 
DB 



DB 
DB 
DB 

DB 
DB 



0DH :• CARRIAGE RETURN 
02H i 2 SPACES 
'BUFFER LENGTH ='' 



DB 
DB 
DB 
DB 
DB 



301 DB 

302 STEP1: DB 

303 DB 



304 DB 

305 STEP2: DB 

306 DB 



02H 
0FFH 
0DH 
04H 



2 SPACES 

PRINT TEXT AND ANSNER 

CARRIAGE RETURN 

4 SPACES 



WITHOUT ANSWER' 



DB OFEH 

DB ODH 

DB 02H 

DB •'TRUNCATE 



DB 0AH 



TEXT ONLV 
CARRIAGE RETURN 
2 SPACES 
SPACES" 



10 SPACES 
12 SPACES 
TEXT AND ANSWER 
CARRIAGE RETURN 
6 SPACES 



0CH 

0FFH 

ODH 

06H 

'TEST OF PRDAT ROUTINE' 



OFEH J TEXT ONLV 

ODH .= CARRIAGE RETURN 

' TEXT PLUS ANSWER'' 



OFEH ; TEXT ONLV 
ODH i CARRIAGE RETURN 
' TRUNCATED TEXT' 
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I bib- 1 1 8080/8085 MACRO ASSEMBLER.. V2. 



MODULE 



PAGE 



LOG OBJ 



4573 
4574 
4575 
4579 
457D 
4581 
4585 
4589 
458A 
458B 
458F 
4592 
4597 
459B 
459D 



FE 

OD 

20544558 

54205749 

54484F55 

5420414E 

53574552 

FE 

OD 

20545255 

4E434154 

45442053 
5Q414349 

4E47 
FE 



459E 


F5 


459F 


5F 


45A0 


1600 


45A2 


CDE515 


45A5 


7D 


45fl6 


21EF44 


45A9 


CDDFOA 


45AC 


70 


45AD 


23 


45flE 


71 


45AF 


23 


45B0 


3620 


45B2 


Fl 


45B3 


4F 


45B4 


C9 



SEQ 

307 

308 STEP3: 

309 



310 
311 
312 



JTEP4 



SOURCE STATEMENT 

DB OFEH i TEXT ONLY 

DB 0DH .: CARRIAGE RETURN 

DB - TEXT WITHOUT ANSWER-' 



DB OFEH ; TEXT ONLV 

DB 0DH .; CARRIAGE RETURN 

DB '■ TRUNCATED SPACING' 



313 




DB 


OFEH 


314 


.; 






315 


> ROUTINE TO LOAD C 


316 


.; 






317 


DOIT: 


PUSH 


PSW 


318 




MOV 


E, A 


319 




MVI 


D, 0OH 


320 




CALL 


BINBC 


321 




MOV 


A, L 


322 




LXI 


H, ANSWR 


323 




CALL 


CNASI 


324 




MOV 


M, B 


325 




I NX 


H 


326 




MOV 


M, C 


327 




I NX 


H 


328 




MVI 


M, 20H 


329 




POP 


PSW 


330 




MOV 


C, A 


331 




RET 




332 


} 






333 


i END 


OF PROGRAM 


334 


.; 






335 




END 





TEXT ONLV 



SAVE ACCUM 

BINARY COUNT 

SET FOR CONVERSION 

CONVERT TO BCD 

GET BCD COUNT 

POINT TO ANSWER BUFFER 

CONVERT COUNT TO ASCII IN B&C 

STORE FIRST DIGIT 

MOVE POINTER 

STORE SECOND DIGIT 

MOVE POINTER 

SET SPACE FOR END CHARACTER 

RETRIEVE COUNT 

PUT COUNT INTO REG C 



PUBLIC SYMBOLS 



EXTERNAL SYMBOLS 



USER SYMBOLS 



ANSWR A 


44EF 


BINBC 


A 15E5 


CNASI 


A 


SADF 


GETCH A 


441D 


HEAD1 


A 4538 


LDTXT 


A 


441C 


MESS3 A 


4524 


NOTPC 


A 4450 


NXTCH 


A 


4432 


SPACE A 


4426 


START 


A 4461 


STEP1 


A 


4550 


ASSEMBLY 


COMPLETE, NO 


ERRORS 









DOIT A 459E 

LODCH A 443B 

OUTB1 A 44D1 

STEP2 A 4563 



ECHO A OIF 

LOOPA A 444 

0UTB2 A 44E 

STEP3 A 457 
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Ref.#AB121 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 D8080 D8048 >$8085 D Other. 



(use additional sheets if necessary) 



MON805 — Monitor for iSBC 80/05 or 80/04 

2K byte debug monitor for Intel 80/05 and 80/04. Provides simple memory 
and register display and modification commands as well as program 
execution with breakpoints. In addition, the monitor supports paper tape 
1/0 if a TTY unit is connected as the console device. 

Intel iSBC 80/05 or 80/04 with console CRT or TTY (TTY required for paper 
tape I/O). 



None 



Monitor includes rudimentary command line interpreter for operator 
interface. See SBC 80P05 User's Guide (Manual //9800508A) for further 
details. 



Available on non-system 
diskette only for $35.00, 
(source & object code 
included) 



Registers Modified: 



All 



RAM Required: oi !.,.«.„„ c *- i 

Jl bytes & stack 



ROM Required: m4 byt 



es 



Maximum Subroutine Nesting Level: rv 8 



Assembler/Compiler Used: 8080 macroassembler 



Programmer: This monitor is supplied 
in ROM form to customers purchas ing 



Company: the iSBC 80P05. 



Address: 



City: 



State: 



© Intel Corporation, 1976 



6/78 



98-0340 

4-590 



Ref .#AB122 



insite INTEL: USER'S library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 D8080 D8048 D8085 DOther_ 



(use additional sheets if necessary) 



MON810 — Monitor for iSBC 80/10 or 80/10A 

2K byte debug monitor for Intel iSBC 80/10 and 80/10A. Provides simple 
memory and register display and modification commands as well as program 
execution with breakpoints. In addition, the monitor supports paper tape 
I/O if a TTY unit is connected as the console device. 

Intel iSBC 80/10 or 80/10A with console CRT or TTY (TTY required for 
paper tape 1/0) . 



none 



Monitor includes rudimentary command line interpreter for operator 
interface. See SBC 80P and 80P10 Prototyping Package User's Guide 
(manual order #98002230) for further details. 



Available 


on non- 


•system 


diskette < 


Dnly for 


• $35.00. 


(source & 


object 


code 


included) 







Registers Modified: 



All 



RAM Required: 



Programmer: This monitor is supplied 
in ROM form to customers purchasing 



16 + stack usage 



ROM Required: 



1374 bytes 



Maximum Subroutine Nesting Level: rv8 



Assembler/Compiler Used: 8080 macroassembler 



Company: the iSBC 80P10 Prototype 
Package and System 80/10. 



Address: 



City: 



State: 



© Intel Corporation. 1976 



6/78 



98-034D 

4-592 



insite INTEL: USERS library submittal form 



Ref .#AB123 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 D8080 D8048 D8085 D Other. 



. (use additional sheets if necessary) 



MON820 — Monitor for iSBC 80/20 or 80/20-4 

2K byte debug monitor for Intel iSBC 80/20 and 80/20-4. Provides simple 
memory and register display and modification commands as well as program 
execution with breakpoints and single stepping. In addition, the monitor 
supports paper tape I/O if a TTY unit is connected as the console device. 

Intel iSBC 80/20 or 80/20-4 with console CRT or TTY (TTY required for 
paper tape I/O) 



none 



Monitor includes rudimentary command line interpreter for operator 
interface. See SBC 80P20 User's Guide (Manual #98-338C) for further 
details. 



Available on non-system 
diskette only for $35.00. 
(source & object code 
included) 



Registers Modified: « ■■ , 



RAM Required: 45 + 8tack 



ROM Required: 



1708 



Maximum Subroutine Nesting Level: ^ « 



Assembler/Compiler Used: 



8080 macroassembler 



Programmer: This monitor is provided 
in ROM form to customers purchasing 



Company: the iSBC 80P20 prototype 

package and system 80/20-4. 



Address: 



City: 



State: 



© Intel Corporation, 1976 

6/78 



98-034D 

4-594 



Ref.# AA20 



insiW INTEL: USEFrs library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 $8080 D8048 08085 DOther_ 



(use additional sheets if necessary) 



L 



INPUT/OUTPUT DIAGNOSTIC 8080 

Allows interactive testing of any MDS I/O port(s). Also allows saving 
and reloading the test program. 



MDS System with Disc 



MDS ISIS System 



See Command Summary 



Program available 
on diskette only. 



Registers Modified: 

ALL 



RAM Required: 

2340 Decimal 



ROM Required: 



Maximum Subroutine Nesting Level: 
16 



Assembler/Compiler Used: 

Intel VI. 1 



Programmer: 

S. G. Thompson 



Company: 

Harris Controls 



Address: 

P.O. Box 430 



City: 

Melbourne 



State: 

Florida 32901 



© Intel Corporation, 1976 

8/78 



98-034D 

4-596 



Ref.# AA20 



COMMAND SUMMARY 
Input/Output Diagnostic 8080 



The following commands are valid when the diagnostic is loaded and 
has typed the sign-on message: 'I/O test VI. 1' and prompted the operator 
with 'M:\ Abbreviations for each command are in parentheses. 

CLR - Clears the Input/Output buffer of all commands. 
(CL) 

EDIT N - Edits the Input/Output buffer starting at line number 'N\ 
(ED) Valid inputs are: 

IN YY input data from port 'YY' 
(I) 

OUT XX, YY output data 'XX' to port 'YY' 
(0) 

DELT delete line entry 
(D) 

X exit from editor 



CR 



(carriage return) steps to next line, the 
present line is not altered 



EXIT - Exit to the MDS-800 monitor 
(EX) 

INIT - Initialize the one bit flag variables and 16 bit variables as 
follows: 

FS = 1 format switch on 

RS = repeat switch off 

HS = home cursor switch off 

IC = 32i6 inter character time of 50 10 ms 

IM = inter message time of 0i ms 

IN YY - Inputs and displays the data received from port 'YY'. 

LIST XX - List the Input/Output buffer starting with line 'XX'. If the 
( LI ) line # is missing then the listing starts at line number 0. 

LOAD NAME - Load the previously saved diagnostic Input/Output buffer saved 
( L °) under the disk name 'NAME'. 'NAME' may have the following formats: 

:F1: STEVE. TST as :drive#: Filename. extension 

STEVE as Filename (assumes drive 0) 

DIAG.00X as Filename. extension 

DIAG as Filename (assumes drive 0) 

OUT XX, YY - The data specified by 'XX' is output to port 'YY'. 

SAVE NAME - Save the present diagnostic input/output buffer to disk under 
the name 'NAME'. 'NAME' may have the formats previously 
listed for the load command. 

SV NAME ZZZZ - Set the Variables named 'NAME' to the value 'ZZZZ'. 

SEND XX, YY - Send the I/O commands in the I/O buffer starting at line 
(SE) number XX through line number YY. 



TA 
8/78 



Type out All the values of the variables, 



4-597 



The following variables are used in conjunction with the 'SEND' command: 

FS - Format Switch if 'one' causes the data received from any IN 
commands to be printed on the operator interaction device. 

HS - Home Switch if 'one 1 causes the control codes for clear screen 
and home to be executed by the output formatter so that one 
CRT page of data will be repetitively displayed. 

RS - Repeat Switch if 'one' causes the I/O buffer to be sent repeatedly 

until a break character (STX = control B) is entered by the operator. 

IC - Inter Character timing value. The time value is used between each 
I/O command. The units are 1/1000 of a second. 

IM - .Inter Message timing value. The time value used between each 
repetition of the I/O buffer (assumes RS=1). The units are 
1/1000 of a second. 



8/78 4-598 



Ref.# AB124 



insite lUJEV USER ' S library submittal form 



D 4004/4040 D8008 B8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



. EXTRCT 
Extracts selected lines from an ISIS source or print file 



MDS, Floppy Disk 



ISIS 

1) Command Line: 

EXTRCT source file TO destination file 

2) Range of Lines: 
XXXX.YYYY 

3) End of Operation: 
END 



Registers Modified: 



N/A 



RAM Required: 



37AH 



ROM Required: 



Maximum Subroutine Nesting Level: 
N/A 



Assembler/Compiler Used: 

8080/8085 Macro Assembler V2.0 



Programmer: 



Ken Norris 



Company: 

Darnel Systems 



Address: 

9525 Katy Frwy. 



City: 

Houston 



State: 

Texas 77024 



© Intel Corporation. 1976 

8/78 



98-034D 

4-600 



flSMSe :F1: EXTRCT. SRC MflCROFILE NOGEN 



ISIS--II 8088/8885 MACRO ASSEMBLER, V2. 6 EXTRCT PAGE 1 
EXTRCT. SRC - SELECTIVE LINE EXTRACT 

LOC BJ SEQ SOURCE STATEMENT 

1 *TITLE('EXTRCT. SRC - SELECTIVE LIfC EXTRACT') 

2 NAME EXTRCT 

3 STKLN 40H 

4 ; 

5 ; THIS PROGRAM EXTRACTS LINES FROM A SOURCE FILE 
6; 

7 ; COMMAND SEQUENCE: 

8 ; EXTRCT SOURCE. FILE TO DESTINATION. FILE 
3 ; 

18 ; PROGRAM WILL PROMPT CONSOLE WITH '*'. 

11 ; RESPOND WITH: LINEA,LINEB(CR>. 

12 ; LINES FROM LINEft TO LINEB WILL BE MOVED TO DESTINATION FILE 

13 ; REPEAT UNTIL ALL DESIRED SEGMENTS HAVE BEEN MOVED, THEN 

14 ; RESPOND WITH: END(CR). 

15 ; (DO NOT ATTEMPT TO BACK UP, RESULTS ARE UNDEFINED ) 

16 ; PROGRAM WILL RETURN TO ISIS. 
17 



Ref.# AB124 



0098 


IS OPEN 


EQU 





8602 


19 READ 


EQU 


3 


0004 


20 WRITE 


EQU 


4 


0009 


21 EXIT 


EQU 


9 


000C 


U. 

23 


ERROR 


EQU 


12 




24 




EXTRN 


ISIS 




25 










"lb 


; MACRO DEFS 






27 


SVSTEM 


MACRO 


8TVPL BLOCK 




28 




MVI 


CSTVPE 




29 




LXI 


D, C'BLOCK 




30 




CALL 


ISIS 




31 




LDA 


STATUS 




i2 




ORft 


A 




33 




JNZ 


ERR 




34 




ENDM 






35 










36 MOVE 


MACRO 


STO 




37 




LXI 


0,&TO 




38 




CALL 


MOVEW 




39 




ENDM 






40 










41 TEST 


MACRO 


mi, m. 




42 




LXI 


H,mi 




43 




LXI 


D, &W2 




44 




CALL 


TESTW 




45 




ENDM 






46 










47 ( 


:heck 


MACRO 


i?DEST 




48 




LXI 


H, 9DEST 




49 




CALL 


CONVD 




50 




ENDM 





51 

52 COMPR MACRO &L, »2 



8/78 



4-601 



IS-II 8886/8885 MACRO ASSEMBLER, V2. 


EXTRCT PAGE 2 


TRCT. SRC - SELECTIVE LINE EXTRACT 






LOC OBJ 


SEQ 


SOURCE STATEMENT 








53 


LHLD 


n 








54 


XCHG 










55 


LHLD 


§i 








56 


CALL 


HILO 








57 


ENDM 










58 












59 


CSEG 


PAGE 








68 








8808 310080 


S 


61 BEGIN: 


LXI 


SP, STACK ; 1 


NITIALIZE PTRS 


0083 210080 




62 


LXI 


H,8 




8086 220200 


D 


63 


SHLD 


IPTR 








64 


SVSTEM 


READ,CBLK ;( 


SET COMMAND STRING 


8818 216800 


D 


71 


LXI 


Hi C6UFF 








72 


MOVE 


IFILE ; 


3ET INPUT FILE NAME 






75 


MOVE 


DUMMV ; 


3ET 'TO' (WE HOPE) 






78 


MOVE 


OFILE i 


GET OUTPUT FILE NAME 






81 


TEST 


DUMMV.. HWi ; 


MIDDLE WORD 'TO'? 


0036 C2E000 


C 


85 


JNZ 


SERR ; 


NO 






86 


SVSTEM 


OPEN. BBLK ; 


OK, OPEN :BB: 






93 


SVSTEM 


OPEN, OIBLK ; 


OPEN INPUT (ECHO TO :B6:> 






188 


SVSTEM 


0PEN,QQ6LK 


OPEN OUTPUT 






187 












188 LOOP: 


SVSTEM 


WRITE, SBLK ; 


PROMPT 






115 


SVSTEM 


READ, CBLK ; 


GET RANGE 


8884 3A8808 


D 


122 


LDfl 


ACTUAL ; 


EOF? 


8887 67 




123 


ORA 


A 




0888 CAD108 


c 


124 


JZ 


DONE 








125 


TEST 


C6UFF, BENDS ; 


'END'? 


0894 DAD188 


c 


129 


JC 


DiM i 


VES 


0897 116888 


D 


138 


LXI 


D, C8UFF 


NO, TEST & CONVERT TO DECIMAL 






131 


CHECK 


PARM1 


START OF RANGE 


89fl0 D2E888 


C 


134 


JNC 


SERR 


BAD 






135 


CHECK 


parm2 


END OF RANGE 


88A9 D2E808 


c 


138 


JNC 


SERR 








139 


COMPR 


PARM2, PARM1 


TEST PARHK=PARM2 


88B6 FflE880 


c 


144 


JM 


SERR 


NO 


88B9 CD6881 


c 


145 


CALL 


SKIP 


VES, SKIP TO START OF RANGE ON INPUT FILE 


886C CD8C81 


c 


146 


CALL 


SAVE 


COPY FROM HERE TO END OF RANGE 


808F C36688 


c 


147 


JMP 


LOOP 


CONTINUE 






148 ERR: 


SVSTEM 


ERROR, EBLK 


; SVSTEM ERROR 






155 DONE: 


SVSTEf 


EXILXBLK 


; RETURN TO SVSTEM 


08E8 3ECA 




162 SERR: 


I1VI 


A, 282 


; SYNTAX ERROR 


88E2 320182 


c 


163 


STfl 


STATUS 




80E5 C3C286 


c 


164 
165 


JMP 


ERR 




08E8 3E8D 




166 HOVEH 


: HVI 


A,0DH 


; MOVES WORD POINTED TO BV H&L TO BUFFER 


88Efi 12 




167 


STFIX 


D 


; POINTED TO BV D&E 


88E6 7E 




168 M0V85 


: MOV 


a,m 


, TERMINATES ON TRAILING COMMA, SPACE 


88EC 23 




169 


INX 


H 


; SLASH OR CR. IGNORES LEADING COMMA, 


88ED FE8D 




178 


CPI 


0m 


i SPACE OR SLASH. TERMINATOR RETURNED 


80EF C2F688 


c 


171 


JNZ 


MOV10 


i IN A-REG. 


88F2 3EFF 




172 


MVI 


A,8FFH 




80F4 B7 




173 


ORfl 


A 


, fl-REQ MINUS ON RET=> NO FARM. 


88F5 C9 




174 


RET 






88F6 CD6901 


c 


175 tiovie 


: CALL 


VflLDL 


, LEADING TERM. ? 
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ISiS-il 8080/8685 MACRO ASSEMBLER, V2. 6 EXTRCT PAGE 4 
EXTRCT SRC - SELECTIVE LINE EXTRACT 

LOC OBJ SEQ SOURCE STATEMENT 

6l4t 83 231 DAD B ■*18 

014?' 4F 222 MOV C,A 

0148 0t.0S 222 HV1 B,0 

814R 09 224 DAD B ; + NEW DIGIT 

0146 C33201 C 225 JMP C0N85 

014E Ci 226 C0N18. POP B 

014F 7D 227 MOV A,L 

0150 02 228 STAX B 

0151 02 229 INX B 

0152 7C 248 MOV A,H 

0153 02 241 STAX B 

0154 C22501 C 242 JMP GOOD J SUCCESS 
615? El 242 C0N15: POP H J ERROR 
0158 C22701 C 244 JMP BAD 

245 

015B K 29 246VHLDG: SUI '8' ; VALID DIGIT TESKCONVERT TO BIN) 

015D FA2701 C 247 JM BAD 

6160 FEOA 248 CPI 10 

0162 F22781 C 249 JP BAD itRROR 

0165 C22581 C 250 JMP GOOD ;OK NOW 

251 

252 SKIP: COf'ff'R IPTR,PARM ; READ TO START OF RANGE 

0172 D8 257 RC 'OK 

258 SVSTEM READ, 1BLK ; NOT VET 

8182 2A0280 D 265 LHLD IPTR 

0185 23 266 INX H 

0186 220200 D 267 SHLD IPTR 
0189 C26801 C 268 JMP SKIP 

269 

270 C .AVE- SVSTEM WRITE, OBLK ; SAVE THIS RECORD 

277 COMPR IPTR,PARM2 ; SAVED TO END OF RANGE VET? 

01A5 D8 282 RC ' VES 

282 SVSTEM READ, IBLK ; NO, GET NEXT 

81B5 2A0280 D 290 LHLD IPTR 

81B8 22 29i INX H 

01B9 226200 D 292 SHLD IPTR 

01BC C28C01 C 293 JMP SAVE 

294 

295 ; CONTROL BLOCKS 

01BF 0106 296CBLK: DW 1, CBUFF, 128, ACTUAL, STATUS ; CONSOLE INPUT BLOCK 

01C1 6800 D 
81C2 8000 

01C5 0000 D 

01C7 0102 C 

81C9F101 C 297 OOBLK: DW OAFT, OFILE, 2, 0, STATUS ; OPEN OUTPUT BLUCK 

01CB 4800 D 
01CD 0200 

01CF 0000 

01D1 8102 C _ r _. „_,_ Dl .... 

01D2E781 C 298 0IBLK: DW IAFT,IFILE,1 ;UPEN INPUT BLOCK 

01D5 8800 D 

01D? 0100 

01D9 0080 299 BAFT: DW 0,bTATUS 

01DB 0102 C 

01DD D*01 C 208BBLK: DW BAFT, 8BB& 2, 0, STATUS ;OPEN :BB: BLUCK 

8/78 4 " 604 



ISIS-I I 8888/8885 MACRO ASSEMBLER, Y2. 8 EXTRCT PAGE 6 
EXTRCT. SRC - SELECTIVE LINE EXTRACT 

MQV15 C88FE MOVE +8881 MOVEH C 68E8 OAFT C 81F1 OBLK C 81F1 OFILE D 8848 OIBLK C 61D3 

OOBLK C 81C9 OPEN A 8888 PARM1 D 8884 PARM2 D 8886 READ A 8882 SAVE C 818C SBLK C 81F9 

SERR C 88E8 SKIP C 8168 STATUS C 8281 SYSTEM + 8888 TEST + 8882 TESTN C 8115 VALDG C 8158 

VALDL C 8189 WRITE A 6884 XBLK C 8282 

ASSEMBLY COMPLETE, NO ERRORS 



8/78 4 " 606 



Ref. #AB125 



JnSJte INTEL ' USER'S library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004 D4040 D8008 SI 8080 D3000 □ Other 



(use additional sheets if necessary) 



BINARY PUNCH TAPE FOR PROM PROGRAMMER - PUNCH 



MDS-800, INTELLEC DISKETTE OPERATING SYSTEM TTY 
OPTIONAL: HIGH SPEED PUNCH 



ISIS-II 



SEE ATTACHMENT 



SEE ATTACHMENT 



Registers Modified: 



ALL 



RAM Required: 



32K 



ROM Required: 



MDS MONITOR 



Maximum Subroutine Nesting Level: 



3 LEVELS 



Assembler/Compiler Used: , _., _„. 

ASM- 80 



8/78 



® Intel Corporation. 1976 



Programmer: 



JOHN P. NAGEL 



Company: 



SINGER-KEARFOTT 



Address: 



150 TOTOWA ROAD 



City: 



WAYNE 



State: 



NEW JERSEY, 07470 



98 034 C 

A cno 



Ref. # AB125 

BINARY PUNCH PROGRAM 

Example of Use: 

An 8K program starting at location 0000H has been 
written and debugged and resides on the non-system 
disk, and is named SAMPLE . OBJ . A User wants to 
punch 8, IK paper tapes to be used for programming 
8, IK PROMS. The Binary Punch Program is named PUNCH 
and resides on the system disk. 

The paper tape is punched as follows: 

1) In ISIS-II mode, the User types 
the following command: 

- PUNCH :Fl: SAMPLE. OBJ (CR) 

2) The Program will respond with the 
following question: 

Data Length in HEX 100, 200, 
400, 800? 

The User should type in 400 (CR) 

3) The Program will respond with the 
following question: 

Start Address in HEX? 

The User should type in (CR) 

4) The Program will respond with the 
following question: 

Number of tapes? 

The User should type in 8 (CR) 

5) The Paper Tape Punch will punch 8 tapes 
with a leader and a trailer and with 
256 nulls inbetween each tape. Then 
the ISIS-II prompt will appear on the 
console . 



8/78 4-609 



insite INTEL ' USER s library submittal form 



Ref. #AB126 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004/4040 08008 XX8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



HEXSYM 



Converts absolute object code in Hex-file-format to an object module 
in OBJ-format with symbol table. 



MDS-800 (with DOS) 



ISIS-II, Console commands HEXOBJ, COPY, DELETE 

The program HEXSYM must be used with the following sequence of commands: 

HEXOBJ filenamei TO HHH START (addr) 
HEXSYM filenamej 
COPY H1.H2.H3 TO filename E 
DELETE H?,HHH 

filenamei - file with object code in hex-file format 

filename 2 - converted file in absolute OBJ -file-format with a 
symbol table 

H1,H2,H3 and HHH are auxiliary files 



Registers Modified: 



alT 



RAM Required 



iam Kequired: 

ISIS-dependent 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

Intel! ec MDS Macro Assembler V. 2.0 



'rogrammer: 

Macha Erich (E52 E32) 



Company : 



oy: 

Telefunken 



Address: 

Steinheimer Str. 117 



City: 

D-6453 Seligenstadt 



State: 
WESTERN GERMANY 



© Intel Corporation, 1976 

8/78 



98-034D 
4-611 



Ref. #AB127 



flSMS0 :F1:RETRV£SRC 



ISIS-II 8B80/8885 MACRO ASSEMBLER, V2. 8 



MODULE PAGE 1 



LOG OBJ 



SEQ 



SOURCE STATEMENT 



@0FF 
0D96 
F809 
8080 

001A 

808ft 

F88C 
8E88 

8828 

8828 318488 
8823 21968D 
8826 5E 
882? 23 
8028 56 
0823 21008E 
002C 7E 
802D FEFF 
882F C24708 
0832 23 

8833 IB 

8834 7A 
0035 FE08 
8837 C24000 
683ft 7B 
003B FE00 
083D CA5800 
8848 4E 
8841 CD8CF8' 

8/78 



1 
2 
3 
4 
5 
6 
? 
8 
9 

10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
28 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
4? 
48 
49 
50 
51 
52 



; TITLE 



'RETRIEVE" 



; A. D. SHORT 5TH JANUARY 1978 

;WHEN USING THE MDS TEXT EDITOR <N0 DOS) IT IS POSSIBLE FOR 
; TEXT TO BE LOST IF 

;A> THE INTERRUPT SWITCH IS OPERATED INADVERTANTLV OR 
;B> AN 'E' IS ENTERED IN ft COMMAND WHEN THE DESIGNATED 
; SVSTEM PUNCH IS NOT fiT THE TIME AVAILABLE IN WHICH 

CASE THE INTERRUPT SWITCH MUST BE OPERATED 

DELIBERATELV TO ESCAPE. 
; TEXT IS NORMALLY LOST FOR GOOD. 

i THIS PROGRAM EXTRACTS TEXT FROM THE TEXT BUFFER MEMORV AREA 
;AND OUTPUTS IT VIA THE DESIGNATED SVSTEM PUNCH IN THE CORRECT 
; FORMAT FOR RE-ENTERING IT TO THE TEXT EDITOR USING THE 'W 



BEGHD 


EQU 


8FFH 


BUFLS 


EQU 


0D96H 


CO 


EQU 


0F803H 


CR 


EQU 


0DH 


EOF 


EQU 


lflH 


LF 


EQU 


0AH 


PO 


EQU 


0F88CH 


START 


EQU 


0E08H 



IF TEXT HAS BEEN OVERWRITTEN THE PROGRAM WILL EXIT WITH 
'ALL LOST' DISPLAYED ON THE CONSOLE DEVICE. IF OK THEN 
'ALL RECORDED' WILL BE DISPLAYED. A CHECK IS NEVERTHELESS 
ADVISABLE SINCE PART OF THE RECORDED TEXT MAY BE CORRUPT 
IF OTHER PROCEDURES ARE TRIED BEFORE THIS PROGRAM IS RUN. 



i START WORD OF TEXT BUFFER 
BUFFER LENGTH STORE 
MONITOR CONSOLE 0/P ROUTINE 
ASCII CARRIAGE RETURN CHAR 
END OF FILE MARK/CONTROL Z 
ASCII LINE FEED CHAR 
MONITOR PUNCH 0/P ROUTINE 
BEGINNING OF TEXT BUFFER 



i LOAD STACK POINTER 

; LOAD ADDRESS OF BUFFER LENGTH STORE 

;LOAD LS BYTE OF BUFFER LENGTH WORD 

; LOAD MS BYTE OF BUFFER LENGTH WORD 

;LOAD ADDR OF BEGINNING OF TEXT BUFFER 

i GET FIRST WORD 

; IS IT THE START WORD? 

; NO-ALL LOST SO BRANCH FOR FAILURE 

; ELSE ADDRESS NEXT WORD 

;ANDDECR BUFFER LENGTH 



ORG 20H 

LXI SP.STAK 

LXI H, BUFLS 

MOV E,M 

INX H 

MOV D,M 

LXI H, START 

MOV A,M 

CPI BEGWD 

JNZ ERROR 

AGAIN: INX H 

DCX D 

MOV A,D 

CPI 

JNZ READ 

MOV A, E 

CPI 8 

JZ FINIS 

READ: MOV CM 

CALL PO 



; IF MS BYTE >8 BRANCH FOR READ 



; IF LS BYTE=8 THEN BRANCH TO END 

;GET NEXT CHARACTER 

; OUTPUT IT TO SYSTEM PUNCH 



4-618 



ISIS-II 8888/8885 MACRO ASSEMBLER, V2 8 



MODULE PAGE 



LOC OBJ 

8844 C22288 
8847 216888 

TOW own 

884CCD5E88 
884F C7 
8858 8Elfl 
8852 CD8CF8 
8855 217280 
8858 868E 
885fl CD5E88 
885L 1 C7 
885E 4E 
885F CD89FS 
8862 05 
8862 C8 
8064 22 
8865 C25E00 
0868 414C4C28 
006C 4C4F 5254 
8878 8D 
0071 8ft 



SEQ 



SOURCE STATEMENT 



0072 414C4C28 
8876 5245434F 
007ft 52444544 
087E 8D 
887F 8fi 
888E 

8884 
8884 



52 

54 ERROR: 

55 

56 

57 

58 FINIS: 

59 

68 

61 

62 

62 

64 MSGL: 

65 

66 

67 

68 

69 

78 MES1: 



JMP 

LXI 

HVI 

CflLL 

RST 

HVI 

CALL 

LXI 

HVI 

CftLL 

RST 

MOV 

CALL 

DCR 

RZ 

IKK 
JMP 

DB 



71 LMES1 

72 MES2: 06 



AGfilN ; AND SEE ftBOUT ANOTHER CHftRftCTER 

Hi MES1 i LOftD ADDRESS OF ERROR MESSAGE 

B.LMES1 ; LOftD MESSAGE LENGTH 

MSGL iOUTFUT MESSftGE 

; AND RETURN TO MONITOR 

CEOF j LOftD END OF FILE CHftRftCTER 

PO ; AND OUTPUT IT TO SYSTEM PUNCH 

H,MES2 i LOftD ftDDRESS OF SUCCESS MESSftGE 

B.LMES2 ; LOftD MESSftGE LENGTH 

MSGL ; OUTPUT MESSftGE 

;AND RETURN TO MONITOR 

CM i LOftD MESSAGE CHftRftCTER 

CO ;flND OUTPUT IT TO CONSOLE 

B ; DECREMENT CHftRftCTER COUNT 

; RETURN IF ZERO=ftLL DONE 
H i ELSE SET FOR NEXT CHftRftCTER 
MSGL ; AND LOOP 
'ALL LQST'',CR,LF 



EQU *-MESl 

'ftLL RECORDED', CR,LF 



73 

74 

75 

76 

77 

78 

79 

88 

81 

82 

82 

84 

85 

86 

87 

88 

89 

98 

91 

92 

92 

94 

95 



LMES2 EQU 

BLANK: DS 4 
STftK. EQU 



I-MES2 

;STftCK AREA 
$ 



; HAVING ASSEMBLED THIS PROGRftM RELOAD THE TEXT EDITOR AND 

; ENTER KNOWN TEXT. MODIFV THIS TEXT AT HILL WHEN 

; SATISFIED OPERfiTE THE INTERRUPT 8 SWITCH TO RETURN TO THE 

; MONITOR. CONTENTS OF THE TEXT BUFFER ARE NOW NOHINftLLY LOST. 

; LOftD ASSEMBLED 'RETRIEVE'. ENSURE THAT THE SVSTEM PUNCH IS 

; ON LINE AND THE 'G28'. 

i MESSAGE 'ftLL RECORDED'' HILL BE DISPLftVED ON THE CONSOLE WHEN 

j PUNCHING IS FINISHED. 

j MODIFY MEMORY LOCATION 8E88H FROM 0FFH TO ANY OTHER VftLUE. 

;RELOftD 'RETRIEVE'' ftND 'G20'. 

; MESSAGE 'ALL LOST' WILL BE DISPLAYED INDICATING CORRUPTION 

i OF THE BEGINNING OF THE TEXT BUFFER ftRER 

j RELOAD TEXT EDITOR ftND ENTER THE TftPE PRODUCED BY THE 'ftLL 

i RECORDED' RUN USING THE 'ft' COHMftND. THE TEXT ENTERED WILL 

; BE FOUND TO BE IDENTICAL TO THAT LOST WHEN THE INTERRUPT 8 

; SWITCH WAS PRESSED. 



END 



PUBLIC SYMBOLS 



EXTERNAL SYMBOLS 
8/78 



4-619 



USER SVMBOLS 



ISIS-II 8888/8885 fifiCRQ ASSEMBLER, VZ 6 KQOULE pflGE 3 

AGAIN ft 983i BEGWD ft 89FF BLfiNK fl 9688 BUFLS ft 8D96 CO fl F889 CR ft 889D EOF ft 88ift 

ERROR HW647 FINIS ft 885* LF fl 886fi LMESi ft 868fi UES2 fl 868E MESi H 6068 HES2 ft 9872 

HSGL H 90S Fij ft FS8C: REflD ft 9849 STftK ft 8984 STftRT ft 9E88 

HSSEieLV COMPLETE, NO ERRORS 



8/78 4-620 



Ref. #AB128A 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 $8008 D8080 D8048 D8085 DOthe 



. (use additional sheets if necessary) 



CALIBRATION OF AN EXTERNAL INPUT DEVICE (EID) FOR MAPPING WITH THE SURFACE 
OF A CRT TERMINAL HLt 

This program has two independent parts. The first part initializes the CRT 
screen for the calibration procedure by displaying the active EID-area and 
marks where to calibrate the screen (EIDCAL-IN). The second part (EID- 
CALMA) of the calibration procedure collects the EID data of calibration 
points. The received data are transformed to the screen coordinate system 
and converted from BCD to binary. Now each coordinate pair is checked to 
determine if its X-coordinate is in the approximate area of the calibration 
spots. After the valid data of the last spot is accepted, the following 
defmements and computations are done: (1) left and right boundary of area 
(2) bottom and top boundary of area (3) area increments in X and Y axis 
(4) screen character per TSD digit in X and Y axis. 

Fixed point package. 
BCD - binary conversion 

EID - digits from the EID-service-routine. 



Computations: 



Flags: 



Left and right boundary of device area. 
Bottom and top boundary of device area. 
Screen characters per EID-digit. 

Device calibrated. 



AB128A is offered as 
one program with AB128B. 



Registers Modified: 



RAM Required: 

1A H 



ROM Required: 

C29 H 



Maximum Subroutine Nestinq Level: 
6 H 



Assembler/Compiler Used: 

PLM 80 



Programmer: 



Dr. Theodor Luetzeler 



Company: 



Siemens Corporation 



Address: 



3 Computer Drive 



City: 



Cherry Hill 



State: 



New Jersey 



© Intel Corporation, 1976 
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Ref. #AB128B 



JnSltp 'HTEL' USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004/4040 D8008 CO 8080 D8048 D8085 D Other. 



. (use additional sheets if necessary) 



^FORMATION ROUTINE FOR COORDINATE DIGITS FROM AN EXTERNAL INPUT 
DEVICE (EID) INTO X- Y- COORDINATES OF A CRT TERMINAL 

This program supports a hardware arrangement of an external input device 
which produces coordinate digits. The coordinates are displayed on a ' 
CRT terminal. The significant steps are: Coordinate origin transformatior 
BCD to binary conversion. Limit checking. Computations. Preparation for 
cursor positioning. 



Fixed point package 
BCD to binary conversion 



X and Y digits from the service routine of the EID. 
Output of the calibration procedure (see separate program), 



X and Y coordinates of the CRT terminal screen 

Flag, which indicates that the input device was activated. 

Flag, which requests to position the cursor at the calculated spot. 

Data to position the cursor. 



AB128B is offered as 
one program with AB128A. 



Registers Modified: 



RAM Required: 

5A H 



ROM Required: 
364 H 



Maximum Subroutine Nestinq Level- 

6 H 



Assembler/Compiler Used: 

PLM 80 



Programmer: 



Dr. Theodor Luetzeler 



Company: 



Siemens Corporation 



Address: 



3 Computer Drive 



City: 



Cherry Hill 



State: 



New Jersey 



© Intel Corporation, 1976 
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Ref. #AB129 



insife " INTEL * USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 H8080 D8048 D8085 □ Other. 



(use additional sheets if necessary) 



CHECK SUM 

This program calculates two verification digits for data string until IK 
bytes, and types them out on the console output device. It uses the 
ISIS-II system calls and it's invoked by the command CHKSUM.ABS 
<FILENAME>, where <FILENAME> is the name of the hexadecimal file that 
has the data string input. The calculation way is a simple summation of 
all input bytes, with overflow from the low checksum to the high checksum 
The two output digits could be used for ROM check purposes. 

Intel! ec MDS with 32K RAM 



ISIS-II operating system 



Diskette with CHKSUM.ABS program and with data string input file. 
CHKSUM.ABS <FILENAME> from the console. 



Two hexadecimal digits on the console. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

ISIS-II 8080/8085 Macro Assembler V2.0 



Programmer: 



rogrammer: 

DIEGO SANCHEZ HERNANDEZ 



Compai 



Sm parry: 
.E.E. - Electromedi 



cina 



Address: 

Doctor Esquerdo, 187 



Citv: 



MADRID. 



State: 
SPAIN 



© Intal Corporation, 1976 
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Ref. #AB129 
ASM88 :F1:CHKSURSRC 

ISIS-I I 3888/8885 MACRO ASSEMBLER, V2 8 MODULE PAGE 1 

LOG 06 J SEfi SOURCE STATEMENT 

i i check: sun 

2 : THIS PROGRAM CALCULATES TWO VERIFICATION DIGITS FOR DATA 

2 ; STRING UNTIL IK BYTES- AND TYPES OUT THEM ON THE CONSOLE 

4 ; OUTPUT DEVICE. 

5 ; IT USES THE ISIS-II SYSTEM CALLS AND- IT IS INVOKED BY THE 

6 ; COMMAND : 

7 , CHKSUM. ABS <FILENRHE> 

8 ; WHERE <FILENflfE> IS THE NAME OF THE HEXADECIMAL FILE THAT 

3 :■ HAS THE DATA STRING INPUT. 

19 • THE CALCULATION WAV IS A SIMPLE SUMMATION OF ALL INPUT 
U • BYTES, WITH OVERFLOW FROM THE LOW CHECKSUM TO THE HIGH 
12 , CHECKSUM. 
12 ; THE TWO OUTPUT DIGITS COULD BE USEE' FOR ROM CHECK PURPOSES. 

14 , MARCH-1378. DIEGO SANC:HEZ 

15 , 

16 , 

17 : 

18 $TITLE( -'SYMBOLS ) 

19 IEJECT 



8/78 4-627 



SYMBOLS 

LOC OBJ SEQ 

0086 



000i 
6004 
0009 
000C 



RO ASSEMBLER, V2. 


MODULE 


PAGE 


Q 


SOURCE 


STATEMENT 




20 OPEN 


EflU 







21 CLOSE 


EQU 


1 




22 READ 


EQU 


? 




23 WRITE 


EQU 


4 




24 EXIT 


EQU 


Q 




25 ERROR 


EQU 


12 





it> i 

27 .• 

28 ; 

29 *TITLE(-MHIM PROGRAM') 

30 REJECT 



8/78 



4-628 



ISIS- II 8080,-' 
MRIN PROGRAM 

LOC OBJ 



5985 MACRO ASSEMBLER, V2. 



MODULE PAGE 



5EQ 



SOURCE STATEMENT 







21 


EXTRN 


1 ISIS 






"?'~ t 










J-t .' 










^ _. 


CSEQ 








24 ; 






6000 21S000 


C ( 


25 CHKSUM 

26 ; 


: LXI 


SP, STACK 


0002 8E02 




27 


MVI 


CREAD 


0005 110000 


D 


28 


LXI 


D, RBLK 


0008 CD8000 


E 


33 


CftLL 


ISIS 


0006 2H2200 


D 


40 


LDfl 


STATUS 


000E 67 




41 


ORfl 


fl 


000F C28D60 


c 


42 
42 ; 

44 


JNZ 


ERR 


0012 0E00 




MVI 


C, OPEN 


0014 110H00 


D 


45 


LXI 


D, OBLK 


0017 CD0060 


E 


46 


CALL 


ISIS 


M01fi 2H2200 


D 


47 


LDfl 


STATUS 


001C- 67 




48 


ORfl 


ft 


001E C28D00 


c 


49 


JMZ 


ERR 


0021 2H0000 


D 


58 


LHLD 


AFT 


0024 221C00 


D 


51 

C.'-i . 


SHLD 


CftFT 


0027 0E02 




52 


MVI 


C, READ 


0029 110000 


D 


54 


LXI 


D, RBLK 


902C CDO000 




J J 


CALL 


ISIS 


602F 2A2280 


[> 


56 


LDfl 


STATUS 


0022 e? 




57 


ORfl 


A 


0822 C28D00 


c 


58 


JNZ 


ERR 


0026 1600 




■J 2 .' 

60 


MVI 


D,8 


0028 1E00 




61 


MVI 


LB 


002fl 212800 


D 


62 

62 ; 


LXI 


H, BUFFER 


002D 2E2ft 




64 LOOP1: 

65 ; 


MVI 


A,2AH 


002f BE 




66 L00P2: 


CMP 


M 


0640 22 




67 


INX 


H 


0041 C22F00 


C 


68 
69 ; 


JNZ 


L00P2 


0044 CD9D08 


c 


70 


CftLL 


PACKET 


0047 CH6200 


c 


71 


JZ 


DONE 


004ft 010700 




72 


LXI 


B,7 


004D 03 




7i 


DfiD 


6 


O04E 47 




74 
75; 
76 SUM: 


MOV 


B,fi 


004F 2E2ft 




MVI 


A,2AH 


0051 CD9D00 


c 


77 


CftLL 


PACKET 


0054 82 




78 


ADD 


E 


0055 D25900 


c 


79 


JNC 


sum 


0058 14 




80 


INR 


D 


0059 5F 




81 SUM1: 


MOV 


E..A 


005FI 22 




Oi 


INX 


H 


0O5B 05 




82 


DCR 


6 


005C C24FO0 


c 


84 


JNZ 


SUM 


005F C22D00 


c 


85 


JMP 


LOOP1 



; BEGINING OF CODE SEGMENT 

* STACK INITIALIZATION 

> REftD FILENAME FROM THE :CO: 



; OPEN THE INPUT FILE 



READ DE INPUT FILE 



; BEGINING OF THE PROCESS 
, D.. E = HIGH, LOW CH 



• H 



; JUMP 6 BVTES 

# 6 = COUNTER 

■> fl = : 

; A = BVTE TO ADD 
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ISIS-ii 8088/8985 MACRO ASSEMBLER. V2. 9 
MftIN PROGRAM 



MODULE PAGE 



LGC OE 



SEQ 



SOURCE STATEMENT 



9982 212301 
9065 ?2 
9086 CO69O0 
8«69 22 
086ft 72 
886B CDB990 

096E 0E84 

9070 111490 

0973 CD0990 
90?6 2A22O0 
0979 B? 
007ft C28D90 

897D 9E91 
997F 111C00 
9082 CD9000 
9085 0E09 

9087 112099 
008ft CD0000 

008D 0E9C 
098F 112209 

0092 CD0000 

0095 0E09 
0997 112000 

099ft CD0000 



D 
E 

D 

E 



86 i 

87 DONE: 
88 

89 
90 
91 
92 

94 
95 
96 
97 
98 
99 

100 

101 

102 

102 

194 

105 

106 

107 ; 

198 ERR: 

109 

110 

111 

112 

112 

114 ; 

115 i 

116 ; 

117 ITITLErPfiCK' 

118 REJECT 



LXI 
MOV 

CftLL 
I NX 
PIOV 
CHLL 

HVI 
LXI 
CftLL 
LDfl 

ORft 

JNZ 

HVI 

LXI 

CALL 

MVI 

LXI 

CALL 

MVI 

LXI 

CftLL 

MVI 

LXI 

CftLL 



H,CHECKN 

M,D 

UNPACK 

H 

i'l E 

UNPACK 

C, WRITE 

D, HBLK 
ISIS 
STATUS 

ft 
ERR 

C, CLOSE 

D, CBLK 
ISIS 
CEX1T 

D.XBLK 
ISIS 

C.. ERROR 
0- EBLK 
ISIS 
C, EXIT 
D.. X6LK 
ISIS 



STORE CHECK SUM 
HIGH CHECK SUM 



, uM CritU i'U'i 



i WRITE TO THE CONSOLE 



i CLOSE THE INPUT FILE 
; NORMAL EXIT 



; ERROR EXIT 



8/78 
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ISIS-I I 8088/8885 MACRO ASSEMBLER, V2.0 MODULE PAGE 5 
PACK 

LOC OBJ SEQ SOURCE STATEMENT 

113 i SUBROUTINE THAT PACKS TWO HEXADECIMAL DIGITS INTO ONE 

120 ; BYTE AND PUTS IT IN THE ACCUMULATOR. 

121 ; LIKE INF'UT PARAMETERS H&L REGISTERS MUST POINT AT THE 

122 } TWO DIGITS, A® THE ACCUMULATOR MUST BE EQUAL TO 2AH 
122 ; 

B8» Bt 124 PACKET: CMP M ; fl = • 

889E ?E 125 MOV A,M 

009F D2A40U C 126 JNC NUMBER 

08A2 D62? 127 SUI 27H ; LETTER 

09A4 E60F 128 NUMBER: ANI 6FH 

00A6 07 129 RLC 

00A7 07 130 RLC 

00A3 07 131 RLC 

00A9 07 132 RLC 

W* *F 132 MOV C, A ■, C = 4 MSB 

134 ; 

80AB2E2A 135 MVI A,2AH ; fl « ■ 

88AD 22 126 \w, H 

00AE BE 137 CMP M 

06AF7E 128 MOV A,M 

00B0 D2B500 C 129 JNC NUMBR2 

06B2 0627 140 SUI 37H ; LETTER 

O0B5 E60F 141 NUMBR2: ANI 8FH 

m7 B1 ^2 ORA C j A = PACKET NUMBER 

"8 C9 142 RET 

144 ; 

145 ; 

146 ; 

147 *TITLE( UNPACK') 

148 IEJECT 
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4-631 



ISIS-II 8888/8985 MflCRO ASSEMBLER, 
UNPACK 



V2.8 



MODULE PAGE 



LOC OBJ 



88B9 3EF8 

88BB A6 

88BC 8F 

80BD 8F 

88BE 8F 

886F 8F 

88C0 FE8A 

88C2 DAC788 
88C5 C687 
88C7 C638 
88C9 47 
88Cfl 3E9F 
88CC A6 
88CD FE8A 
60CF DfiD488 
88D2 C607 
88D4 C630 
08D6 78 



SEQ SOURCE STATEMENT 

SUBRftlTINE THAT UNPACKS ONE BVTE INTO TWO HEXADECIMAL 

DIGITS. 

HiL REGISTERS MUST POINT AT THE INPUT BVTE, AND THE 

TWO OUTPUT DIGITS WILL BE IN THE SAME MEMORY POSITION 

AND IN THE NEXT. 



88D9 C9 



149 
158 
151 
152 
153 
154 
155 
156 
157 
158 
159 
168 

161 

162 

163 

164 NMBR: 

165 

166 

167 

168 

169 

170 

171 NttBRl 

172 



UNPACK: MVI 
ANA 
RRC 
RRC 
RRC 
RRC 
CPI 
JC 
ADI 
ADI 
MOV 
MVI 
ANA 
CPI 
JC 
ADI 
ADI 
MOV 
INX 
MOV 
RET 



fi..0F8H 
M 



8AH 

NMBR 

7 
( 

38H 

B,A 

A,8FH 

M 

8AH 

NMBR1 

7 

38H 

H6 

H 

M,A 



173 

174 
175 

176 i 

177 ; 

178 ; 

179 $TITLE(- BUFFERS AND DATA') 
188 REJECT 



LETTER 



LETTER 
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ISIS-II 8088/6085 MACRO ASSEMBLER, Y2. 8 
BUFFERS AND DATA 



MODULE PAGE 



LOC OBJ 



0002 2800 



0006 2600 
0008 2200 



000C 2800 



0010 0000 

0012 2200 

0014 8000 

8016 280C 

0018 0400 

2200 



0002 
001E 2200 



0002 

0024 2200 

0002 
0C00 



D 
D 

D 
D 



0000 C 

PUBLIC SYMBOLS 



SEQ 

181 
182 ; 
182 RBLK: 
184 AFT: 
185 
186 
187 
188 

189 ; 

190 OBLK: 
191 

192 

192 

194 

195; 

196 HBLK: 

197 

198 

199 

200 ; 

201 CBLK: 

202 CflFT: 
202 

204 ; 

205 XBLK: 



SOURCE STATEMENT 



DSEG 



DM 



DM 



W 



m 



m 



m 

DW 
DW 

m 



DS 

DH 

DW 



207EBLK: 
298 STATUS: DS 

209 DM 

210 ; 

211 ACTUAL: DS 

212 i 

213 BUFFER: DS 

214 i 

215 CHECKN: DS 

216 ; 

217 END 



1 

BUFFER 

3072 

ACTUAL 

STATUS 

AFT 

BUFFER 

2 



STATUS 



CHECKN 

4 

STATUS 



2 

STATUS 

STATUS 



2 

STATUS 

2 

3072 
4 
CHKSUM 



; BEGINING OF DATA SEGMENT 



EXTERNAL SYMBOLS 
ISIS E 



USER SYMBOLS 
ACTUAL D 0026 
CLOSE A 0801 
LOOP1 C 003D 
OPEN A 008O 
UNPACK C 00B9 



AFT 

DONE C 0062 
L00P2 C 003F 
PACKET C 089D 
D 0014 



ASSEMBLY COMPLETE, NO ERRORS 



BUFFER D 0828 
EBLK D 0022 
NMBR C 00C7 
RBLK D 8000 

WRITE A 0004 



CAFT 

ERR 



D 881C 



READ 
XBLK 



C 

A 0093 

D 8020 



CBLK D 001C 
ERROR A 008C 
NUMBER C 00A4 
STATUS D 0022 



CHECKN D 8C28 
EXIT A 0809 
NUMBR2 C 00B5 
SUM C 084F 



CHKSUM C 8000 
ISIS E 0000 
OBLK D 808A 
SUM1 C 0059 
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Ref.#AE15 



INTEL® USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004/4040 D8008 1X8080 D8048 D8085 D Other. 



. (use additional sheets if necessary) 



WRITEP - Output Procedures for PLM80 



Contains several procedures to call by PLM80 programs for formatted 
output of ADDRESS or BYTE values, or output of characters and strings. 



MDS Intel lee 800 



PLM80 

The program uses the ISIS-call WRITE for doing its output, but may easily 
be changed in order to use another output procedure, and thus become 
independent of ISIS. 

See Attached. 



See Attached. 



Registers Modified: 

ALL 



RAM Required: 
OOCEH 



ROM Required: 

0AF4H 



Maximum Subroutine Nesting Level: 
4 



Assembler/Compiler Used: 

PLM80 Compiler V.3.0 



Programmer: 

Karl Pentzlin 



Company: 

Informatik-Forum GmbH 



Address: 

FasanenstraBe 16 



City: 

D-8000 MUnchen 60 



State: 

WEST GERMANY 



© Intel Corporation, 1976 
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Ref. #AE15 



WRITEP contains procedures as listed below: 

1. Formatted Output Procedures: 

CALL WRITEA (address$value, format) 

CALL WRITEB (byte$value, format) 

where "format" is to be declared as ADDRESS parameter and has to be a 
string of one or two characters. The first character specifies the 
wanted format, as listed below. The second character, if given, 
specifies the number of digits to be printed (not at formats L and Y). 

B Binary format. Default length: 16 for WRITEA, 8 for WRITEB 

or Q: Octal format. Default length: 6 for WRITEA, 3 for WRITEB 

D Decimal format. Default length: 5 for WRITEA, 3 for WRITEB 
H Hex format. Default length: 4 for WRITEA, 2 for WRITEB 

1 Integer format. Decimal digits, leading zeroes are replaced by 
spaces. Default length: Number of digits to be printed without 
leading zeroes, depending on specified value. 

S Signed integer format. Like Integer format, but, if most 

significant bit of value is set, it is interpreted as negative 
sign. 

L Logical format. The second character of the format string (must 
not be a format character. Default is "+") is printed, if the 
specified value is "true". If "false", a space is printed. 

N Name format. Only for WRITEB. The name of the specified value 
interpreted as an ASCII character is printed (i.e., "LF" for 
OAH). Default length: Length of the name. For all names check 
source file. 

Y Two bytes octal format. Only for WRITEA. 

High and low byte of specified value are printed by 3 octal 
digits each, and are separated by the second character of the 
format string (which must not be a format character. Default 
is "#"). Therefore, the format length is 7. 

Moreover, there is an error format, which is used if the format string 
does not begin with a format character. It is like format H, with 
additional printing of the erroneous format string. 

2. Other Output procedures: 

CALL WRITEL 

Print the end of a line (that is, CR and LF). 

CALL WRITEC (character, count) 

Write the specified character <count> times, "character" is to be 

declared as BYTE parameter, "count" as ADDRESS parameter. 

CALL WRITES (stringpointer) 

Write the string based by "stringpointer" (which is to be declared as 
ADDRESS parameter). The string may contain any ASCII characters and 
is to be terminated with an ETX (End of Text, 03H) character. 



8 /78 4-636 



CALL WRITEN (stringpointer, count) 

Write the string based by "stringpointer", and the length of which is 

<count> (both parameters are to be declared ADDRESS). 

CALL WRITEV (stringpointer, count) 

Like WRITEN, but invisible ASCII characters (like CR, LF) are replaced 
by visible ones (CR and LF by "/", HT (Horizontal Tabulation) by the 
inverse slash, all others by "!"). 

3. Output Control procedure: 

CALL WRITED (aftn) 

Change output device, "aftn" (which is to be declared as ADDRESS 

parameter) specifies the output device by its AFTN, as it is given 

by the ISIS-call OPEN. Console output (:C0:) is specified by zero. 

At beginning of a program run, console output is output device for 
all WRITEP procedures. 

WRITEP uses an internal buffer for all output done by WRITEP procedures 
except when output device is console output (console output is always done 
immediately during each WRITEP procedure call). 
Therefore, regard this notice : 

Except i f you output on console , you have to call WRITED before you want to 
output on the same device as used by WRITEP by other than WRITEP procedures 
(e.g. by ISIS-call WRITE), and you have to call WRITED at the end of your 
program run , due to the fact that WRITED empties the internal buffer before 
regarding the new "aftn" value (which, in fact, may be the same as the old one), 
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Ref. #AE16 

INTEL® USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 OS 8080 D8048 D8085 □ Other. 



(use additional sheets if necessary) 



ERRORP/MESSGP - Printing Subroutine for ISIS-II Error Messages and User 
Messages with Filename 

ERRORP prints an ISIS-II error message, together with a filename, if 
one is specified. 

MESSGP does the same with a user defined message. 



MDS 800 Intel lee 



ISIS-II 

The system calls WRITE and ERROR are used. 

See Attached. 



See Attached. 



Registers Modified: 

ASSUME ALL 


Programmer: 

Karl Pentzlin 


RAM Required: 

0020H 


Company: 

Informatik-Forum GmbH 


ROM Required: 
061BH 


Address: 

Fasanenstra$e 16 


Maximum Subroutine Nestinq Level: 

2 


City: 

D-8000 MUnchen 60 


Assembler/Compiler Used: 

PL/M-80 Compiler V.3.0 


State: 
WEST GERMANY 



© Intel Corporation, 1976 
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Ref. # AE16 
ERRORP is to be declared as follows: 

ERRORP: PROCEDURE (ERRORNUMBER, FILENAME) EXTERNAL; 

DECLARE (ERRORNUMBER, FILENAME) ADDRESS; END; 

ERRORNUMBER contains the error number as given by any ISIS-II system call by 
the STATUS parameter. If ERRORNUMBER = 0, (that is, the ISIS-II system 
call was done without an error) the call of ERRORP will have no effect. 
Otherwise, an error message will be output as readable text, e.g. "NO 
SUCH FILE" if ERRORNUMBER =13. 

FILENAME either contains (then only the error message will be printed), or 
is a pointer to the beginning of an ISIS-II filename or device specific- 
ation. Then this name will be printed before the error message, 
separated by a comma (without leading spaces, if any). 

MESSGP is to be declared as follows: 

MESSGP: PROCEDURE (TEXTPOINTER, FILENAME) EXTERNAL, 

DECLARE (TEXTPOINTER, FILENAME) ADDRESS; END; 

TEXTPOINTER is a pointer to the beginning of an ASCII string representing 
the user defined message. The text has to be concluded by an ETX End 
of Text, 03H) byte. 

FILENAME has the same function as for ERRORP. 

All printing will be done on :C0: (Console Output). 

Before printing a message, a Carriage Return/Line Feed will be output. 
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INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 [38008 D8080 D8048 D8085 DOther_ 



. (use additional sheets if necessary) 



F0RMFD-F0RMFEED TO LINEFEED CONVERSION PROGRAM 

This program will convert all formfeeds in a program listing, 
except the first one, to line feeds. The program was created for 
use with the Intel MDS-770 linepr inter. The program will add a 
paging feature to the 770 printer. 



MDS-800 or SERIES-II Development System 



ISIS-II Operating System 
MDS System Monitor 



Syntax as follows: 

FORMFD filename. LST To :LP: (To Lineprinter) 

To :T0: (To Teletype List) 
To filename. EXT (To Store On Disk) 



The output device will list your program with the appropriate 
number of Linefeeds replacing all but the first formfeed. 



Registers Modified: 


Programmer: 

Mary Jane Elmore 


RAM Required: 


Company: 

Intel Corp. 


ROM Required: 


Address: 

3065 Bowers Ave. 


Maximum Subroutine Nesting Level: 


City: 

Santa Clara 


Assembler/Compiler Used: 

PL/M 80 


State: 

Calif. 95051 



©.Intel Corporation, 1976 
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PL/M-80 COMP I LER 



Ref.# AB130 



PAGE 



I SIS- 1 1 PL/M-80 V3. 1 COMPILATION OF MODULE ERRBLOCK 

OBJECT MODULE PLfiCED IN : F4 : UTILS. OBJ 

COMP I LER I NVOKED BV : PLM80 : F4 : UT I LS. PLM NORKF I LES <. : F4 : , : F4 : > 



tDEBUG PAGE W I DTH < 80 > 
/♦PROCEDURE TO SEND ERROR MESSAGE TO CONSOLE *,• 



ERRBLOCK 



DO.; 



EXIT: 

PROCEDURE EXTERNAL.; 
END EXIT.; 



ERROR : 

PROCEDURE ■:: ERRNUM > EXTERNAL.; 
DECLARE ERRNUM ADDRESS.; 
END ERROR.; 



3 

10 

11 
12 



ERRPRT: PROCEDURE < ERRNO) PUBLIC. 
DECLARE ERRNO ADDRESS.; 

CALL. ERRORt ERRNO :>:. 

CALL EXIT; 

END ERRPRT.; 

END ERRBLOCK; 



MODULE INFORMATION: 



CODE AREA SIZE 


= O012H 


18C 


VARIABLE AREA SIZE = 


= 060 2 H 


2D 


MAXIMUM STACK SIZE = 


= 0002 H 


2C 


30 LINES READ 






PROGRAM ERROR IS'l 







END OF PL/M-80 COMPILATION 
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PL/M-80 COMPILER PF,GE 

ISIS-II PL/M-80 V3. 1 COMPILATION OF MODULE FORMFD 

OBJECT MODULE PLACED IN : Fl : FORMFD. OBJ 

COMP I LER I NVOKED BV : : Fl : PLM80 : Fl : FORMFD. PLM 



* DEBUG P AGEW I DTH ( PA •> 

/* THIS PROGRAM WILL CONVERT ALL BUT THE FIRST FORMFEED IN & 
VOUR PROGRAM AND LISTING TO LINEFEEDS. */ 



FORMFD : DO.: 

DECLARE BUFFER':. 128::' BYTE.; 

DECLARE OUTBUF'::20O0.:' BVTE.: 

DECLARE ACTUALfCGUNT ADDRESS.: 

DECLARE STATUS ADDRESS.: 

DECLARE AFT* IN ADDRESS.: 

DECLARE AFTtOUT ADDRESS.: 

DECLARE READfACCESS LITERALLY 'l'.: 

DECLARE WRITE*ACCESS LITERALLY -'2':- 

DECLARE NOT*END*OF*FILE LITERALLY 'RCTURLtCOUNT O &■' :■ 

DECLARE ERRMSG ':: + ;• BYTE DATA TERROR IN COMMAND TAIL - ', ODH, OAH", 

DECLARE OUT*BUF* INDEX BYTE.: 

DECLARE READ*BUF* I NDEX ADDRESS.: 

DECLARE WR I TEf-BUF* I NDEX ADDRESS.: 

DECLARE LINESCOUNT BYTE.: 

DECLARE I BYTE: 

DECLARE LINE*FEED LITERALLY 'EiRH-'.; 

DECLARE FORMfFEED LITERALLY -'OCH-'j 

DECLARE FIRST*READ BYTE.: 

DECLARE TRUE LITERALLY "l"; 

DECLARE FALSE LITERALLY '&■':■ 



pp'nCEDURECAFT, FILE, ACCESS, MODE, STATUS;' EXTERNAL.: 
DECLARE':: AFT, FILE, ACCESS, MODE, STATUS;' ADDRESS; 
END OPEN; 



; " b J " L ' L ppnr: F r:'URE':: AFT, STATUS::' EXTERNAL; 
;:. A ; r, DECLARE CFlFT, STA TUS :> ADDREbb; 

27 2 END CLOSE, 

■~'P, 1 RFAD ' 

Ppnr:FDI IRE •■ AFT . BUFFER, COUNT, ACTUAL, STATUS > EXTERNAL.: 
09 2 DECLARE':: AFT, BUFFER, COUNT, ACTUAL, STATUS;' ADDREbb.: 

30 2 END READ; 

":j l WRITE: 

PROCEDURE'; AFT, BUFFER, COUNT, STATUS;' EXTERNHL, 
■-..;;. ;:. DECLARE-:: AFT, BUFFER, COUNT. STATUS::' ADDRESS, 

33 2 END WRITE.; 

10/78 4-645 



k! 


1 


3 


1 


4 


1 


5 


1 


6 


1 


!"' 


1 


|~| 


1 


9 


1 


10 


1 


11. 


1 


12 


1 


13 


1 


14 


1 


15 


1 


16 


1 


17 


1 


18 


1 


19 


1 


20 


1 


21 


1 



'M-80 COMPILER prqp 



34 1 EXIT: 

PROCEDURE EXTERNAL.; 
25 2 END EXIT.; 

36 1 ERROR : 

PROCEDURE CERRNUM::' EXTERNAL.; 

37 2 DECLARE ERRNUM ADDRESS; 
■-=8 2 END ERROR.; 

39 1 ERRPRT : 

PROCEDURE 'iERRNO::. EXTERNAL; 

40 2 DECLARE ERRNO ADDRESS; 

41 2 END ERRPRT.; 



X+'READ THE CONSOLE FILE TO GET THE PARAMETER STRING*. 



42 1 



45 l 

46 1 



48 


1 


49 


1 


58 


1 


51. 


V 



CALL READ CI, BUFFER, 128, . ACTUAL*CniJNT. STATUS' - '; 
4i :1 IF STATUS >@ THEN CALL ERRPRT < STATUS > ; 

CALL OPENC AFT* IN, . BUFFER, READ* ACCESS, 8, . STATUS:.; 
IF bTATUS >S THEN CALL ERRPRT < STATUS >.; 



,-'+ OUTPUT BUFFER INDEX LOOP*/ 



OUTtBUF* INDEX = 0; 
I = 0.; 

DO WHILE OUT*BUF* INDEX = O HND I <= F|f:TI IAL *mi INT; 
IF BUFFER a ;:■ = - ■- THEN 

IF BUFFER a +i:j - "T"' THEN 

IF BUFFERC 1+2!:' = - Q- THEN 

IF BUFFER-: I +3) = " " THEN 

OUTfBUF* INDEX = 1+4; 
1 = 1+1.; 

END.; 



IF OUTtBUF* INDEX = O THEN 

DO.; 

CALL WRITE CO/. ERRMSG, 23, . STATUS':.; 
CALL EXIT.; 
END.; 

CALL OPEN.;. AFTtOUT, . BUFFER <OUT*BUF* I NDEXX. WRITEtACHES^. m, sTflTl IS". ■. 
IF bTATUb >8 THEN CALL ERRPRT C STATUS >.; 
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59 


1 


60 


ii! 


61 


t-'-'i 


62 


s 


63 


i 


64 


i 



PL/M-88 COMP I LER 



PAOE 



66 


1 


S7 


1 


68 


1 


69 


1 


79 


1. 



'* CHANGE FORMFEEDS TO LINEFEEDS +, 



FIRST*READ - TRUE; 
WR1TESBUF* INDEX = 8; 
READtBUF* INDEX = 6; 
LINE$COUNT = 66; 
ACTUALfCOUNT = 1; 

71 i CALL READ <-. AFT* I N, . BUFFER, 128, . ACTUALtCOUNT 



DA WHILE NOT*END*OF*FILE; 

IF STATUS > THEN CALL ERERRT< STATUS), 

IF FIRSTtRERD = TRUE THEN 

DO; 

OUTBUFOID - BUFFER OliD; 
WRITE*BUF*J.NDEX = WR IT E*BUF* INDEX + 1; 

DO READtBUF* INDEX ■= 1 TO ACTUAL*COUN"f - :!..■ 



3S 



84 



4 IF BUFFER <READ$BUF* INDEX) = FORM*FE.ED THEN 



■-• t-i -_l 



31 4 DO; 

:,.-, cr, DO I ™ 8 TO L.INE*COUNT - 1, 

-,'-. ^ HI ITEM IF < WR I TE*BUF* I NDEX > ■- L I NE$F EED, 

WRITE*BUF*INDEX = WRI TE*BUF* INDEX + 1.; 

END; 

LINEfCOUNT = 66; 

END, 

EL nMTBnF < WR I TE*eUF* I NDEX > = BUFF ER C R£flD*BUF t i NL -EX < 

WRITE*BUFf INDEX = NEITE*BUF* INDEX + L 

END; 

IF BUFFER <READ*BUF* I NDEX.; = LINEFEED THEN 

LINEtCOUNT = LINE*COUNT -1; 

94 4 IF LINEfCOUNT = 8 THEN 

95 4 LINEtCOUNT = 66; 

96 4 END; 

97 3 FIRST*READ = FALSE, 

98 3 END; 

10/78 4-6 47 



8 9 


5 


98 


._! 


91 


5 


92 


4 


93'. 


4 



PL/M-80 COMPILER 



99 2 ELSE DO; 



PRQE 



100 


3 


101 


4 


102 


4 


103 


5 


104 


6 


105 


6 


106 


6 



109 


4 


110 


5 


111 


5 


112 


5 


113 


4 


114 


4 


115 


4 


116 


4 



117 


4 


118 


3 


119 


2 


120 


2 


122 


2 


123 


•;■ 


124 


)-•' 



DO REflD$EUF* INDEX = TO ACTUAL*COUNT - 1; 
IF BUFFER <REflD*BUF* I NDEX) =FORM*FEED THEN 
DO; 

DO I = TO LINEtCOUNT - 1.: 

OUTBUF<WRITE*BUF*INDEJO = LINEFEED; 
WRITE*BUF*IHDEX = WRITE*BUF*INDEX + 1; 

END; 



107 5 LINE*COUNT = 66; 

108 5 END; 



ELSE DO.; 

OUTBUF < WR I TE*BUF* I NDEX > = BUFFER < READtBUF* I NDEX ) ; 

WRITE*BUF*INDEX = WRITE*BUF*INDEX + 1; 
END; 



IF BUFFER <REflD*BUF* I NDEX > = LINEFEED THEN 
LINE*COUNT = LINESCOUNT -1; 

IF LINE*COUNT = THEN 

LINEfCOUNT = 66.: 



END; 
END; 

CALL WR I TE < AFT*OUT , . OUTBUF, WR I TE*BUF* I NDEX . STRTI IS > ; 
IF STATUS > THEN CALL ERRPRT< STATUS ^ 
WRITE*BUF*INDEX = 0; 

CALL READ < AFT* IN, . BUFFER, 128, . ACTUAL*COUNT, . STATUS }; 
END; 



125 1 CALL CLOSE < AFT $ IN, . STATUS}; 

126 1 IF STATUS >0 THEN CALL ERRPRT< STATUS >; 

128 1 CALL CLOSE <AFT*OUT, . STATUS ); 

lk:51 * IF STATUS >0 THEN CALL ERRPRT< STATUS ); 

131 1 CALL EXIT; 

132 1 END FORMFD; 



10/78 4 . 648 



PL/M-80 COMPILER PfiUE 

MODULE I NFORMAT I OH : 

CODE AREA SIZE = 032BH 827D 
VARIABLE AREA SIZE = 0860H 2144D 
MAXIMUM STACK SIZE = O008H 8D 
228 LINES READ 
PPOGPAM EPK'OP ■:'?':' 

END OF PL/M-80 COMPILATION 



10/78 4 " 649 



Ref.#AB131 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 $8008 D8080 D8048 D8085 DOther_ 



(use additional sheets if necessary) 



MONITOR ROUTINES FOR A 3M DCD1 CASSETTE TAPE DRIVE 

To record and play-back records from a SBC system to a 3M DCD1 
tape cassette. Intended as an extension of the SBC-monitor. 



TTY or equiv. serial terminal. One 24 bits parrallel port (8255) 

One 3M DCD1 tape cassette drive incl. electronics. 

One 74123 TTL circuit or equiv. Six 220apull up resistors. 



SBQ 80P monitor or equiv. routines. The tape commands can easily 
be incorporated into the SBC monitor. 

1) O on the TTY to print the catalogue of the tape. 

2) OJ on the TTY to dump the content of a memory area onto the 
tape and get the catalogue updated. 

The start address, end address and record number will be asked 
for by the routine and must be given by the user. 

3) Pii on the TTY to play back a record from the tape into the 
memory. The start address, address limit and record number 
will be asked for by the routine and must be given by the user. 

The program will continuously check the status of the tape drive 
and give a message if anything is wrong. The output routine will 
checkread the written record and then update the catalogue of the 
tape. In case of read error the program pushes the addresses of 
the incorrect bytes during the read operation, and then lists 
these addresses on the TTY. 

For further information, see the demonstration run or contact the 
programmer. 



Registers Modified: 

All 



RAM Required: 

1 k bytes 



ROM Required: 

1075D bvtes 



laximum Subroutine Nesting Level: 



Assembler/Compiler Used: 
ASM/20 



Programmer: 

Per Nylpn 



Company: 

University nf Stockholm 



Address: 

Vanadisvagen 9 



City 

S-113 4fi Stockhnl 



JIL 



State: 

Swed e n 



© Intel Corporation, 1976 
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INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 
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(use additional sheets if necessary) 



ALPHA: AN ALPHABETIZED LISTING OF THE DISK DIRECTORY OUTPUT TO 

THE LINE PRINTER 
1) Stack pointer set, 2) system list device set to line printer, 
3) file :F0: ALPHA DIR opened and read, 4) first two lines of 
directory printer, 5) table built of addresses of entries in the 
directory in alphabetical order, 6) the lines of the directory 
printed as they are listed in the table, 7) the last two lines of 
the directory printed, 8) the system list device reset, 9) program 
exited and control returned to ISIS-II. 

MDS 

disk drive: FO: 

line printer 

console input (CRT or TTY) 

ISIS-II (Tested on V2.2D, V3.4D) 
Intellect Monitor 



:F0: ALPHA. DIR Input to buffer in RAM (IBUF) 



Directory is output character by character from Register C by calling 
the LO routine. 



I/O operations are. performed by the ISIS-II subroutine calls and 
driver routines. 



Registers Modified: 

A,F,B,C,D,E,H,I,SP,PC 


Programmer: 

S. Bann 


ram Required: Module is located 3400 to 
56BAH 229BH + BUFFERS 


Company: 

Xerox 


ROM Required: 

MDS Monitor loaded in ROM 


Address: 

701 S. Aviation Blvd. A2-43 


Maximum Subroutine Nesting Level: 

One level 


City: 

El Sigundo 


Assembler/Compiler Used: 

ISIS-II 8080/8085 Macro Assembler V2.0 


State: 

CA 90245 



© Int. 



iW 



rporation. 1976 



4-65f 



-034D 



ASM80 :Fi:flLFHR5RC 



Ref.# AB132 



isis-ii 8386/3685 macro assembler, v2. 6 
print alphabetized directory 



MODULE PAGE 1 



LUC OBJ SEQ SOURCE STATEMENT 

1 * TITLE( 'PRINT ALPHABETIZED DIRECTORY') 



6066 
0863 
0003 



1H00 
0692 0C00 

0884 6160 

0006 0066 



009: 3fl46363R 
0010 414C5648 
0614 412E4449 
6018 5220 



4 ; PROGRAM NAME: 

5; WRITTEN BY: SHERRI ANN BANN 

6 jDATE: JLINE 36, 1978 

7 .REVISION: A. 00 



9 ; ALPHA IS EXECUTED UNDER THE CONTROL OF ISIS-2 

10 

ii 

12 
13 
14 



iTHIS PROGRAM TAKES AS INPUT :F6:ALFHA. DIR, A FILE CONTAINING THE 
,UNALPHA6ETIZED DIRECTORY LISTING CREATED WITH THE ISIS-2 DIR COMMAND. 



; IT CREATES AS AN OUTPUT BUFFER A TABLE OF POINTERS(fiDDRESSES) WHICH 
■REFER TO THE FIRST BYTES OF FILENAMES IN THE INPUT FILE ALPHABETICALLY, 
; (I. E. THE FIRST POINTER AT THE TOP OF THE OUTPUT FILE REFERS TO THE FIRST 
; FILENAME TO BE OUTPUT IN ALPHABETICAL ORDER 



15 
16 
17 
18 

19 , IT OUTPUTS THE ALPHABETIZED DIRECTORY TO THE LINE PRINTER. 
26 

21 



i.i 

24 
25 
26 

■~i~r 
<Li 

28 

29 

30 

31 

32 

a 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 



■ALPHA ASSUMES: 1) THE DIRECTORY LISTING CONSISTS OF 2 LINES OF HEADER, 
,H VARIABLE NUMBER OF LINES OF FILENAMES AND THEIR LENGTHS AND ATTRIBUTES, 
,AND 2 LINES OF ENDING; 2) EACH LINE IS SEPARATED BY A LINE FEED CHARACTER; 
,3) THE SECOND TO THE LAST LINE IS UNIQUE BECAUSE IT STARTS WITH A SPACE; 
;4) EACH FILENAME IS UNIQUE. 

; THESE ARE JUSTIFIED ASSUMPTIONS UNDER V2. 2D AND VI 4D ISIS-2 SOFTWARE 
; SYSTEM CALLS 



EXTRN IOSET 

EXTRN IQCHK 

EXTRN LO 

EXTRN ISIS 



DSEG 



SET I/O CONFIGURATION 
GET I/O CONFIGURATION 
LIST OUTPUT 



OPEN EQU 6 
READ EQU 3 
EXIT EQU 3 



OPEN CALL PARAMETERS 

OBLK: DW 

DW 

DW 

DW 

m 

OSTAT: DS 
OFILE: DB 
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RBLK 
OFILE 

1 



OSTAT 

2 

':F0: ALPHA. DIR 



4-655 



ISIS-II 3980/3085 MfiCRO ASSEMBLER^ V2. 8 
PRINT ALPHABETIZED DIRECTORV 



MODULE PAGE 



LOG OBJ 



SEQ 



SOURCE STATEMENT 



8082 




801C 2D00 


D 


981E 8819 




9020 2400 


D 


8022 2600 


D 


0002 





0028 2H00 



0001 



2000 



282D FF 

0190 

21BE 2D20 
21C0 BE21 



0000 310800 



8803 CD0000 

0006 322C88 
0089 E63F 
096B F630 
000D 4F 

000E CD8000 



0011 0E00 

0013 110008 D 

8016 CD0086 E 



58 

51 

52 

52 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 



READ CALL PARAMETERS 



RBLK: 



ACTUAL 
RSTAT: 



DS 
DW 
DW 
DW 
DW 
DS 
DS 



2 
IBIJF 

1988H 

ACTUAL 

RSTAT 



■ EXIT CALL PARAMETERS 
E6LK: DW 
ESTAT: DS 



ESTAT 



iSVSTEH CONFIGURATION STATUS BYTE STORAGE 
IOSTOR: DS 1 

i INPUT BUFFER FOR ALPHA. DIR 
IBUF : DS 2888H 



74 

75 

76 

77 

78 

79 

88 

81 

82 

83 

84 

85 

86 

87 

88 

89 

99 

91 

92 

93 

94 

95 

96 

9? 

98 

99 

100 

181 

102 
103 
184 



; OUTPUT BUFFER VARIABLES AND ADDRESSES 

,THE OUTPUT BUFFER IS BUILT UPWARDS WITH NEW ENTRIES PUSHING THE TOP 

;OF THE BUFFER UPWARDS (TOWARDS LOWER MEMORY ADDRESSES) WHILE THE BOTTOM 

, END OF THE BUFFER REMAINS FIXED. 

;EACH ENTRY TAKES TWO BYTES OF STORAGE BECAUSE THEY ARE ADDRESSES 

; THE LOW BYTE PRECEEDS THE HIGH BYTE FOR EACH ADDRESS 



XX: DB 

BUFFER: DS 

ENDBUF: DW 

TPBUFF: DW 



OFFH 
400D 

XX 
ENDBUF 



; EOF DELIMETER FOR BUFFER 

;LIST OF ADDRESSES OF ALPHABETIZED 

i FILE NAMES 

.; ADDRESS OF EOF BUFFER DELIMETER 



CSEG 

; SET STACK POINTER 

START: STKLN 20D 

LXI SP, STACK 



;SET LIST DEVICE TO LINE PRINTER 

CALL IOCHK 

STA IOSTOR 

ANI 3FH 

ORI 80H 

MOV Ci A 

CALL IOSET 

..OPEN DIRECTORY FILE 

MY I COPEN 

LXI D, OBLK 

CALL ISIS 



i SET THE MAXIMUM STACK LENGTH 
;LOAD STACK POINTER 
;HITH VALUE DETERMINED BY 
;THE LOCATE COMMAND 



;GET I/O DEVICE CONFIGURATION 

.; STORE STATUS WORD 

.; CLEAR: LIST DEVICE 

;SET LINE PRINTER TO LIST DEVICE 



.; REPLACE STATUS BYTE 
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4-656 



ISIS-II 8080/8085 MACRO ASSEMBLER, V2. 8 
PRINT ALPHABETIZED DIRECTORV 



MODULE PAGE 



LOC OBJ 



SEQ 



SOURCE STATEMENT 



0819 8E83 
801B 111A08 

001E CD0888 



0021 8E8C 

0023 CD0000 

0026 0E@A 

0028 CD0000 

002B 212D08 



002E 4E 
002F CD0088 
0032 ?E 
8033 EEOA 

0035 23 

0036 C22E00 



6039 4E 
083A CD8000 
803D 7E 
083E EE8A 
9048 23 
8041 C23900 



0044 ?E 
0845 EE28 
804? CAB408 



004A 44 
004B 4D 
804C 2AC021 
004F 2B 
0058 2B 
8051 22C021 
8054 23 
8855 23 



E 
D 



105 
186 
187 
198 
109 

110 

111 

112 

113 

114 

115 

116 

117 

118 

119 

120 

121 

122 

123 

124 

125 

126 

127 

128 . 

129 

138 

131 

132 

133 

134 

135 

136 

137 

138 

139 

148 

141 

142 

143 

144 

145 

146 

147 

148 

149 

158 

151 

152 



; READ DIRECTORV' FILE 

MVI C, READ' 

LXI D,RBLK 

CALL ISIS 



i PRINT OUT 2 LINE HEADER 

MVI C8CH 

CALL LO 

MVI C,0AH 

CALL LO 

LXI Hi IBUF 

; FIRST LINE 

PRNTHD: NOV CM 

CALL LO 

MOV A,M 

XRI OAH 

INK H 

JNZ PRNTHD 



LINE 

PRNTH2: MOV CM 

CALL LO 

MOV A, M 

XRI OAH 

INX H 

JNZ PRNTH2 



; CHECK FOR END OF DIRECTORV 

MOV a M 
XRI 20H 
JZ LLINES 

■> ALPHABETIZE ROUTINE 



153 
154 
155 
156 
157 
158 
159 



RE SET TOP OF BUFFER 

LOOK: MOV B,H 

MOV C, L 

LHLD TPBUFF 

DCX H 

DCX H 

SHLD TPBUFF 

INX H 

INX H 



iFORM FEED 

i PRINT FORM FEED 

;LINE FEED 

/PRINTLINE FEED 

; SET HAL TO Tip OF INPUT BUFFER 



;GET CHARACTER FROM INPUT BUFFER 

; PRINT CHARACTER 

; GET CHARACTER AGAIN 

.■ IS CHARACTER A LINE FEED? 

; POINT HAL TO NEXT CHARACTER 

i JUMP IF CHAR NOT LINE FEED 



;GET CHARACTER FROM INPUT BUFFER 

; PRINT CHARACTER 

; GET CHARACTER AGAIN 

; IS CHARACTER A LINE FEED' 

i ■ POINT HAL TO NEXT CHARACTER 

; JUMP IF CHAR: MOT LINE FEED 



;GET CHAR FROM INPUT BUFFER 
.; IS CHflRflCTER A SPACE? 
; JUMP IF CHAR IS A SPACE 



; POINT BAC TO INPUT CHARACTER 

; POINT HAL TO TOP OF OUT BUFFER 

; MOVE TOP OF OUT BUFFER 

, BACK TWO SPACES 

> STORE NEW TOP OF OUT BUFFER 

; SET HAL BACK TO OLD 

; TOP OF BUFFER 



NEW WORD REFERS TO FILENAME TO BE ALPHABETIZED 

OLD WORD REFERS TO THE FILENAME ALREADY ALPHABETIZED TO WHICH THE NEW WORD 
IS CURRENTLY BEING COMPARED 

COMPARE FIRST LETTER OF NEW FILENAME TO ALREADY ALPHABETIZED FILENAMES 
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4-657 



ISIS-II 8680/8885 MACRO ASSEMBLER, V2. 
PRINT ALPHABETIZED DIPECTORV 



MODULE PAGE 



LLC OBJ 
0056 E5 

0057 5E 

8658 23 

8659 56 
685ft 68 

085B 69 
065C ?E 
865D EB 

885E BE 
865F Cfi?C88 
8662 D28666 



0665 El 

8666 2B 
0667 70 
W068 2B 
0669 71 



806ft 66 
066B 69 
666C 7E 
086D EE6A 
006F 22 

8070 C26C00 C 
0873 7E 
0074 EE20 
8076 CA9588 C 

0079 C24FI00 C 



007C 23 
807D 13 
087E lft 

067F BE 

8088 CH7C80 C 

0883 DA6500 C 



0886 Ei 

0087 54 

0088 50 
0889 IB 
688ft IB 



SEfi 

168 

161 

162 

163 

164 

165 

166 

167 

168 

169 

178 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 

181 

182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

288 

201 

202 

283 

204 

205 

206 

207 

208 

209 

210 

211 

212 

213 

214 



SOURCE STATEMENT 



SEARCH: PUSH H 



MOV 


E,M 


I NX 


H 


MOV 


D,M 


MOV 


H,B 


MOV 


LC 


MOV 


A,M 


XCHG 




CMP 


M 


JZ 


EQUAL 


JNC 


SORT 


RESS Cf NEW FILENAME 


FOUND: POP 


H 


OCX 


H 


MOV 


M,6 


DCX 


H 


MOV 


M,C 



, STORE POINTER OF ADDRESS OF 
; OLD WORD IN STACK 
; POINT D«£ TO FIRST CHARACTER 
iOF FILENRHE IN OUT BUFFER 

; POINT H4L TO FIRST CHARACTER 
..OF FILENAME IN INPUT BUFFER 



GET CHARACTER FROM IN BUFFER 
POINT m. TO OLD WORD 
AND POINT DtE TO NEW WORD 
COMPARE NEW WORD WITH OLD WORD 
FIRST LETTERS ARE SAME 
NEW WORD > OLD WORD 



POINT M. TO ADDRESS OF OLD WORD 

IN OUTPUT BUFFER 

SET H&L TWO SPACES BACK 

SET ADDRESS OF NEW WORD 



IN OUTPUT BUFFER 



GET THE NEXT WORD TO ALPHABETIZE 



NXTWD: MOV 
MOV 

NXTLTR: MOV 
XRI 
I NX 
JNZ 
MOV 
XRI 
JZ 

JMP 



H,B 

LC 

A,M 

8AH 

H 

NXTLTR 

H,M 

20H 

PTDIR 

LOOK 



, POINT H&L TO IN BUFFER AT START 

; OF FILENAME THAT WAS JUST ALPHABETIZED 

; GET CHARACTER FROM IN BUFFER 

.; IS CHARACTER ft LINE FEED-' 

, POINT H4L TO NEXT CHAR IN IN BUFFER 

■> JUMP IF CHAR NOT LINE FEED 

.; GET CHAR FROM IN BUFFER 

, IS CHAR A SPACE? 

; JUMP IF CHAR IS SPACE TO OUTPUT 

; THE DIRECTORY 

.; ELSE JUMP TO ALPHABETIZE THIS 

;NEW FILENAME 



FIRST LETTERS ARE SAME, COMPARE NEXT LETTERS OF SAME WORDS 

EQUAL INX H > POINT H&L TO NEXT CHAR OF OLD WORD 

IHX D > POINT D TO NEXT CHAR: OF NEW WORD 

LDAX D > MOVE CHARACTER OF NEW WORD 

; INTO ACCUMULATOR 

M , COMPARE NEW WORD TO OLD WORD 

EQUAL i JUMP IF LETTERS ARE THE SAME 

FOUND ••■ JUMP IF NEW WORD<OLD WORD 



CMP 

JZ 
JC 



MOVES OLD WORD BACK 



SORT 



POP 
MOV 
MOV 

DCX 

DCX 



IN BUFFER 
H 

D, H 
E,L 
D 
D 



;HtL POINT TO THE ADDRESS OF THE OLD WORD 



;D*E POINT TO THE DESTINATION 

;0F THE ADDRESS OF THE OLD WORD 
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4-658 



ISIS-II 8886/t 


J885 


MACRO 


ASSEMBLER, V2. 


8 


MODULE PAGE 


"RINT ALPHABETIZED DIRECTORV 






LOC OBJ 




SEQ 


SOURCE STATEMENT 


8888 7E 




215 




MOV 


A,M 


mc 12 




216 




STflX 


D 


888D 23 




217 




INK 


H 


88SE 13 




218 




INX 


D 


eesF 7E 




219 




MOV 


A,M 


8898 12 




228 




STflX 


D 


8891 23 




221 
222 
223 




INX 


H 


8892 C35680 


C 


224 
225 
226 
227 
228 




JMP 


SEARCH 






229, 


PRINT OUT DIRECTORV 




8895 E5 




238 
231 


PTDIR: 


PUSH 


H 


8896 2AC821 


D 


232 
233 




LHLD 


TPBUFF 


8899 5E 




234 


PRINT: 


MOV 


E,M 


809A23 




235 




INX 


H 


889B 56 




236 




MOV 


D,H 


889C 23 




237 

238 




INX 


H 


889DEB 




239 
248 




XCHG 




889E ?E 




241 




MOV 


aM 


889F EEFF 




242 




XRI 


8FFH 


88A1 CAB380 


C 


243 
244 




JZ 


ENDING 


88A4 4E 




245 


PLTTR: 


MOV 


CM 


88fl5 CD0888 


E 


246 




CALL 


LO 


88A8 7E 




247 




MOV 


fin 


88A9EE6A 




248 




XRI 


0AH 


80AB23 




249 




INX 


H 


80RC C2R488 


C 


258 




JN2 


PLTTR 


88AF EB 




251 
252 




XCHG 




88B8C39988 


C 


253 
254 




JMP 


PRINT 






255 i 


PRINT OUT LAST 2 LINES 


88B3 El 




256 


ENDING 


POP 


H 


88B4 4E 




257 


LLINES 


MOV 


CM 


8865 CD0880 


E 


258 




CALL 


LO 


88B8 ?E 




259 




MOV 


RiH 


88B9 EE8fl 




268 




XRI 


8AH 


88BB 23 




261 




INX 


H 


88BC C2B488 


C 


262 
263 
264 




JNZ 


LLINES 


88BF 4E 




265 


LLINE: 


MOV 


CM 


88C8 CD0888 


E 


266 




CALL 


LO 


88C3 ?e 




267 




MOV 


A,M 


88C4 EE8fl 




268 




XRI 


0AH 


88C6 23 




269 




INX 


H 



;MOVE BACK LOW BVTE 



;MOVE BACK HIGH BVTE 

; THE NEXT ENTRV IN THE 
; OUTPUT BUFFER NOW BECOMES 
i THE OLD 



;SET STACK TO POINT TO 
: CHARACTER IN INPUT BUFFER 
; POINT HAL TO THE TOP OF THE 
i OUTPUT BUFFER 
i POINT DAE TO THE FILENAME 



POINT HAL TO THE NEXT ENTRV 

IN THE OUT BUFFER 

POINT HAL TO FILENAME 

POINT DAE TO NEXT ENTRV OF OUT BUFFER 

GET CHARACTER TO BE OUPUT 

IS CHAR END OF BUFFER? 

JUMP IF CHAR IS END OF BUFFER 

DELIMETER 

GET CHARACTER TO BE OUTPUT 

PRINT CHARACTER 

GET SAME CHARACTER 

IS CHAR A LINE FEED? 

POINT HAL TO NEXT CHAR 

JUMP IF CHAR IS NOT A LINE FEED 

POINT HAL TO NEXT ENTRV IN 

OUT BUFFER: 



i POINT HAL TO 2ND TO THE LAST LINE 

GET CHARACTER TO BE OUTPUT 

PRINT CHARACTER 

GET CHARACTER AGAIN 

IS CHAR' A LINE FEED? 

POINT HAL TO NEXT CHARACTER 

JUMP IF CHARACTER IS NOT 
•ALINE FEED 

; GET CHARACTER TO BE OUTPUT 

* PRINT CHARACTER 

;GET SAME CHARACTER 

; IS CHARACTER A LINE FEED? 

i POINT HAL TO NEXT CHARACTER 
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4-659 



SIS-II 8888/8885 ffrCRO ASSEMBLER, 


V2.8 


I 


flGOULE FflGE 6 








>RINT ALPHABETIZED DIRECTORY 














loc oej 


SEQ SOURCE STATEMENT 










09C7 C2BF08 


C 270 
271 
272 




JNZ 


LLINE 


;JUMP IF CHARACTER IS NOT 
,A LINE FEED 








273 ; SET LIST DEVICE BACK AND EXIT TO ISIS 










274 ; RESET STATUS 












PWCfl W2C88 


D 275 XIT: 


LDft 


IOSTOR 


; STORED SYSTEM I/O STATUS 






08CD 4F 


276 




MOV 


C,A 








08CE CD0080 


E 277 




CftLL 


IOSET 










278 ;EXIT BACK TO ISIS-II 










06D1 0E09 


279 




nvi 


CEXIT 


.ALL OPEN FILES ARE CLOSED 






00D3 112880 


D 288 




LXI 


D, EBLK 


.; EXCEPT :CI: AND :CO: AND 






00D6 CD6600 


E 281 




CftLL 


ISIS 


.; CONTROL PftSSES BACK TO ISIS 






0008 


C 282 




END 


STftRT 








PUBLIC SYMBOLS 
















EXTERNAL SYMBOLS 














IQCHK E 8000 


IOSET E 8000 


ISIS 


E 0006 


LO E0800 








USER SYMBOLS 
















ACTUAL D 0824 


BUFFER D 202E 


EBLK 


D 0028 


ENDBUF D 21BE 


ENDING C 00B3 EQUAL C 087C 


ESTAT 


D 002ft 


EXIT ft 0809 


FOUT© C 8065 


IBUF 


D002D 


IOCHK E 000W 


IOSET E 8000 IOSTOR: D 002C 


ISIS 


E 0000 


LLINE C 08BF 


LLINES C 08B4 


LO 


E 0008 


LOOK: C 004fl 


NXTLTR C 806C NXTWD C O06A 


OBLK 


D 8000 


OFILE D 800C 


OPEN A 8000 


OSTAT D 800A 


PLTTR C 80ft4 


PRINT C 0099 PRNTH2 C 8039 


PRNTHD 


C 002E 


PTDIR C 8095 


RBLK D 801ft 


READ 


ft 0003 


RSTflT D 8026 


SEARCH C 8056 SORT C 0086 


STftRT 


C 0000 


TPBUFF D 21C0 


XIT C 60Cfi 


XX 


D 202D 










ASSEMBLY COMPLETE, NO ERRORS 
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insite 



Ref.#AB133 



INTEL* USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 QJ8080 D8048 D8085 Kl OtherJJEElOi (use addition* sheets if necessary) 



BLOCK: LARGE HEX FILE INTO PROM LENGTH BLOCKS CONVERTER 

This program is used to prevent a "system error" which could be 
caused by a hex file larger than the usable memory slot available 
while operating the UPM. This program facilitates programming of 
the 2708 I Prom by breaking up a large hex file into prom length 
blocks. 

MDS 800 with 32K Ram, MDS 2DS, Console Device, UPP 102 



32K ISIS-II 



This program should be located at absolute memory address of 3A00H. 
The Dseg portion should be located at 3B00H. I placed this program 
on the system floppy. The program to be worked on should be a hex 
file and can be in either drive or 1. To invoke this program 
type "Block (:F1:) hex File." 



The output results will be newly created files bearing the name of 
the hex file, with the extension of numerical sequence starting at 
00. The extension is derived from the first address of each block. 

After the hex file is blocked, then the UPM program my be called, 
and each block file may be read in in two's. After programming two 
proms, then use the offset function to offset the starting address 
of the next two blocks. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

Tntpll pr MDS Manrn A<;spmh1o r 



Programmer: 

Steven L. Mulkey 



Company: 

Zenith Electronics Corp. of MO. 



Address: 

2500 East Kearney 



City: 

Springfield 



State: 

Missouri 65803 



© Intel I CorDoration, 1976 
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9S 
-662 



-034 D 



Ref.# AB133 



ASH88 :F1:BLCK.SRC 



ISIS-II 8888/f 


3885 


MftCRO ASSEMBLER, V2. 8 


MODULE 


PAGE 1 


LOC OBJ 




SEQ SOURCE STATEMENT 










1 


BLOCK PROGRftM WRITTEN BV 






2 


STEVEN HULKEV 










3 


ZENITH RftDIO CORP OF MO 






4 


2588 EAST KEftRNEV 








5 


SPRINGFIELD, M 




FE6E 




6 


23NV 


EQU 


8FE8EH 




DOW 




7 


)PEN 


EQU 


8 




8881 




8 


1QSE 


EQU 


1 




8883 




9 


SflD 


EQU 


3 




8884 




18 


4RITE 


EQU 


4 




8889 




11 1 


EXIT 


EQU 


9 




Ctoar 




12 1 

13 f 
14 


ERROR 
EXTRN 


EQU 
ISIS 


12 








15 CSEG 








8888 318888 


S 


16 BEGIN: LXI 


SP,STACK+8 


;SET STACK 


8883 3EFC 




17 HVI 


A,8FCH 






8885 32fl28B 


D 


18 STfl 


PROM 




; STORE FILE EXTENSION NUMBER 


8888 8E83 




19 HVI 


CREfiD 






888R 111688 


D 


28 LXI 


D,RBLK 






888D CD8888 


E 


21 CftLL 


ISIS 




;READ KEYBOfiRD FOR FILE TO BE BLOCKED 


8818 3ft2fl88 


D 


22 LDfl 


STATUS 






8813 B7 




23 ORft 


ft 






8814 C24988 


C 


24 JNZ 


ERR 




; CHECK FOR ERROR 


881? cocaee 


c 


25 CALL 


STORE 




; STORE FILE NflHE OF FILE TO BE OPENED 


881R8E88 




26 HVI 


COPEN 






881C 112888 


D 


27 LXI 


D,PBLK 






881F C08888 


E 


28 CflLL 


ISIS 




; OPEN HEX FILE 


8822 3R2R88 





29 LDfl 


STATUS 






8825 B7 




38 ORft 


ft 






8826C24988 


C 


31 JNZ 


ERR 




;CHECK FOR ERROR 


8829 CD5988 


C 


32 flfl: CflLL 


REED 




;REflD 2888H BVTES FROM HEX FILE 


882C 2fl8E88 


D 


33 LHLD 


flCTUflL 




-LOflD HL WITH ACTUAL BVTES REftD 


882F 7C 




34 MOV 


H,H 






8838 B5 




35 ORfl 


L 






8831 cfisiee 


C 


36 JZ 


EXI 




IF H=L THEN HEX FILE HAS BEEN READ 


8834 CD6D88 


C 


37 CflLL 


LOAD 




LOflD STORED FILE NflHE AND EXTENSION 


8837 CD9A08 


c 


38 CflLL 


OPN 




OPEN NEM FILE 


883ft 2ft8ft88 


D 


35 LHLD 


OftFT 






683D 221288 


D 


48 SHLD 


CBLK 




STORE NEW FILE flFTN IN CLOSE BLOCK! 


8848 CDAA88 


C 


41 CflLL 


HRIT 




WRITE 2888H BVTE IN NEM FILE 


8843 CDBA88 


C 


42 CflLL 


CLOS 




CLOSE NEH FILE 


8846C32988 


C 


43 JHP 


Aft 






8849 8E8C 




44 ERR: HVI 


C, ERROR 






984B 112ft88 


D 


45 LXI 


D,EBLK 






884E CD8888 


E 


46 CflLL 


ISIS 


f 


PRINT WHAT TYPE OF ERROR 


8851 8E89 




47EXI: HVI 


CEXIT 






8853 112E08 


D 


48 LXI 


D,XBLK 






8856 CD0888 


E 


49 CflLL 
58 


ISIS 


i 


EXIT BACK TO ISIS 






51 ; SUBROUTINES 










52 
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4-664 



ISIS-II 8088/8685 MACRO ASSEMBLER, V2. 



ftOOULE FflGE 



LOC 06J SEQ 


SOURCE STATEMENT 




0059 8E02 


53 REED: 


MVI 


CREAD 




805B 111680 D 


54 


LXI 


D.RBLK 




805E CD0000 E 


55 


CALL 


ISIS 


,READ HEX FILE OR KEYBOARD 


0861 2A2A00 D 


56 


LDA 


STATUS 




0064 B7 


57 


ORA 


A 




0065 C26900 C 


58 


JNZ 


RERR 


; JUMP IF ERROR OCCURED 


0068 C9 


59 
68 


RET 






0069 Dl 


61 RERR: 


PIP 


D 


;POP RETURN ADDRESS OFF OF STACK 


006A C34900 C 


62 


JMP 


ERR 


; AND JUMP TO ERROR ROUTINE 


006D 21890B D 


63 

64 LOAD: 


LXI 


H.OPA 


; FILE NAME STORAGE 


0070 117006 D 


65 


LXI 


D. OFILE 


, BUFFER FOR NEW FILE TO BE OPENED 


8072 7E 


66 CCC: 


MOV 


A,M 




8074 12 


67 


STAX 


D 




8075 22 


68 


I NX 


H 




0076 13 


69 


INX 


D 




8077 FE2E 


76 
71 


CPI 




.TRANSFER FROM OPA TO OFILE 
; UNTIL '.' 


0679 C27280 C 


72 


JNZ 


CCC 




007C 2AA20B D 


73 


LDA 


PROM 


iLOAD A WITH STORE) EXTENSION 


807F C684 


74 


flDI 


84 


j ADD 4 TO A 


0081 22fi208 D 


75 


STA 


PROM 


; STORE RESULTS 


8084 F5 


76 


PUSH 


PSW 


;SAVE A 


0085 IF 


77 


RAR 






8886 IF 


78 


RAR 






0087 IF 


79 


RAR 






8088 IF 


80 


RAR 




.ROTATE A RIGHT 4 TIMES 


0089 CD8EFE 


81 


call 


CONV 


;CONVER A RIGHT 4 BITS TO ASCIA 


088C 79 




MOV 


A.C 




808D 12 


83 


STAX 


D 


.STORE IN OFILE 


808E 12 


84 


INX 


D 




088F Fl 


85 


POP 


PSW 


i RETRIEVE A 


0090 CD6EFE 


36 


CALL 


CONV 


.CONVERT A RIGHT 4 BITS TO ASCIA 


0092 79 


87 


MOV 


A.C 




0094 12 


88 


STAX 


D 


; STORE IN OFILE 


0895 12 


89 


INX 


D 




00% 2E28 


90 


MVI 


R,' ' 




0098 12 


91 


STAX 


D 


i STORE TERMINATING CHAR 


0899 C9 


92 
92 


RET 






009fl 0E00 


94 OPN: 


MVI 


C.0PEH 




009C 110000 D 


95 


LXI 


D.OBLK 




to9F Cu6800 t 


% 


CALL 


ISIS 


;OPEN FILE 


08R2 2fl2fl88 D 


97 


LDA 


STATUS 




00H5B7 


98 


ORA 


A 




88A6 C26980 C 


99 


JNZ 


RERR 


.JUMP IF ERROR OCCURED 


00H9 C9 


100 
101 


RET 






00AA 0E84 


182 WRIT 


MVI 


C, WRITE 




00HC 110H00 D 


182 


LXI 


D.WBLK 




08RF CD0808 E 


104 


CALL 


ISIS 


; WRITE INTO NEW FILE 


00B2 2fl2fl00 D 


105 


LDA 


STATUS 




00B5B7 


106 


ORA 


A 




00B6 C26980 C 


187 


JNZ 


RERR 


iJUMP IF ERROR OCCURED 



10/78 



4-665 



ilS-II 8988/3885 MACRO ASSEMBLER, V2. 8 MODULE 


PAGE 2 


LOC OBJ 




SEQ 


SOURCE STATEMENT 




68B9C9 




188 
163 


RET 






68BA 8E61 




118 CLOS: 


MVI 


C, CLOSE 




86BC 111286 


D 


111 


LXI 


D,CBLK 




88BF CD8888 


E 


112 


CALL 


ISIS 


; CLOSE FILE 


68C2 3A2A68 


D 


113 


LDA 


STATUS 




88C5B7 




114 


ORA 


A 




88C6 C26968 


C 


115 


JNZ 


RERR 


; JUMP IF ERROR OCCURED 


86C9 C9 




116 
117 


RET 






88CH 213600 


D 


118 STORE: 


LXI 


H, BUFFER 


i POINT HL TO INPUT FROM KEVBO. 


88CD11898B 


D 


119 


LXI 


D,OPA 


;SET D AT PERM. FILE NAME STO. 


66D8 23 




126 


INK 


H 




88D1 7E 




121 BB: 


MOV 


A,H 


i TRANSFERS FROM M INTO A 


86D2FE2E 




122 


CPI 


.-' .-' 


i AND CHECK FOR '. ' 


"88D4 Cf€288 


C 


123 


JZ 


BBB 




88D7FE28 




124 


CPI 


/ / 


,AND SPACE, IF NEITHER OCCURED 


86D9CAE268 


C 


125 


JZ 


BBB 




80DC 12 




126 


STAX 


D 


;STO CHAR AND JMP TO BB 


66DD23 




127 


INX 


H 




88DE13 




128 


INX 


D 




68DF C3D188 


C 


129 


JMP 


BB 




68E2 2E2E 




138 BBB: 


MVI 


A, '. ' 


i STORE '.' IN PERM STOR 


88E4 12 




131 


STAX 


D 




68E5 C9 




132 
133 
134 


RET 
DSEG 






TOOT OTTOO 





135 0BLK: 


DM 


OAFT 


; POINTER FOR OPEN AFTN 


8882 7886 


D 


136 


DW 


OFILE 


# POINTER FOR FILE TO BE OPENED 


8884 8288 




137 


DW 


2 


.OPEN FILE FOR WRITE 


nans flQflfl 
OTTO TOW 




138 


DW 


6 


;N0 ECHO 


8888 2A68 


D 


i39 

148 OflFT: 


DM 


STATUS 


; POINTER FOR STATUS 


8882 




141 HBLK: 


DS 


2 


; STORAGE FOR OPENED FILE AFTN 




D 


142 


DW 


BUFFER 


; POINTER FOR STORAGE AREA 


8882 




143 ACTUAL 


DS 


2 


; STORAGE FOR THE NO. OF BYTE TO BE WRITTEN 


8816 2A66 


D 


144 


DW 


STATUS 


; POINTER FOR STATUS 


8882 




145 CBLK: 


DS 


2 


iAFTN OF FILE TO BE CLOSED 


8814 2A66 


D 


146 

147 RAFT: 


DW 


STATUS 


; POINTER FOR STATUS 


8616 6166 




148 RBLK: 


DW 


1 


;READ KEYBOARD 


8818 3666 


D 


149 


DW 


BUFFER 


; POINTER TO STORAGE AREA 


601A 466B 




158 


DW 


2888 


; BYTES TO BE READ 


881C8E68 


D 


151 


DW 


ACTUAL 


.;HOW MANY WERE ACTUALLY READ 


661E2A66 


D 


152 


DW 


STATUS 


; POINTER FOR STATUS 


6826 1666 


D 


153 PBLK: 


DW 


RAFT 


;AFTNOFHEX FILE 


8822 2888 


D 


154 


DW 


BUFFER 


i POINTER TO STORAGE AREA 


8824 8168 




155 


DW 


1 


;OPEN FOR READ OPERATION 


OTZO Owe 




156 


DW 


6 


;N0 ECHO 


8828 2886 


D 


157 

158 EBLK: 


DW 


STATUS 


i POINTER TO STATUS 


8882 




159 STATUS 


DS 


2 


i STORAGE FOR STATUS 


882C 2A88 


D 


168 


DW 


STATUS 


; POINTER FOR STATUS 


882E 2A88 


D 


161 XBLK: 


DW 


STATUS 


; POINTER FOR STATUS 


6B46 




162 BUFFER 


DS 


2886 


i DEFINED STORAGE OF 2888H BYTES 






10/78 







4-666 



ISIS-II 3886/8885 MACRO ASSEMBLER, V2.0 



MODULE PAGE 



LOC 08J 

8819 
8619 
8982 



SEQ 

163 OFILE: 

164 OPfl: 

165 PROM: 
166 



SOURCE STATEMENT 



DS 
DS 
DS 
END 



25 
25 
2 
BEGIN 



; DEFINED STORAGE OF 25H BVTES 
; DEFINED STORAGE OF 25H BVTES 
i EXTENSION STORAGE 



PUBLIC SVMBOLS 



EXTERNAL SVMBOLS 
ISIS E 



USER SVMBOLS 



AA 

ccc 

EXI 
OPfl 
READ 
WRITE 



0829 
8873 
8851 
8B89 

0883 

8804 



ftCTUAL 

CLOS 

EXIT 

OPEN 

REED 

XBLK 



D 000E BB 
C 08Bfi 
A 0909 
A 0980 
C 0859 
D 882E 



C 8001 BBB C 88E2 BEGIN C 0808 BUFFER D 0030 CBLK D 8812 

CLOSE A 6881 CONV A FE8E EBLK D 882A ERR C 8049 ERROR A 888C 

ISIS E 0000 LOAD C 086D OAFT D 088A OBLK D 8888 OFILE D 8B78 

OPN C 689A PBLK D 0828 PROM D 8BA2 RAFT D 8816 RBLK D 8816 

RERR C 0069 STATUS D 002A STORE C 00CA W6LK D 880A WRIT C 08AA 



ASSEMBLY COMPLETE, NO ERRORS 



10/78 



4-667 



Ref.#AB134 



Jnsitg INTEL 8 USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 08080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



PROM BUS MAPPER 

To Relocate Hex data Bits, prior to programming a PROM which is to be 
used in a system where the address and data lines between yP and PROM 
are not directly related. 



MDS 800 System 



Program + console input and console output routines 



Hex data at address 1000H upwards 

Address and data interconnect information input on console 



Relocated Hex data at address 2000H upwards 



Registers Modified: 



Wi 



RAM Required: 

16K 



ROM Required: 



Maximum Subroutine Nestinq Level: 

2 



Assembler/Compiler Used: 

8080 Macro Ass. V.2.2 



Proararnmer, 



C $rarr^rn er StevenSOn 



Comp, 



b.E.ti. Telecoms. Ltd. 



Address, 



minbank Road 



City: 



Aycliffe Ind. Estate 



State: 

Durham England 



© Intel Corporation, 1976 

10/78 



98-034D 

4-669 



Ref.#AB135 



insite 



INTEL' USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 4004/4040 D8008 1^8080 D8048 E8085 DOthe 



(use additional sheets if necessary) 



FLEXIBLE NAME LIST MANAGER 

To store and retrieve variable length names in a symbol table, 
together with associated attributes. 



8080/8085 + memory 



None 



HL = (BLOCK) 

BLOCK: DB INDEX 

DB ATTRIBUTE 

DB NO, CHARS 

DB 'STRING' 



INDEX & ATTRIBUTE given 'STRING' & NO. CHARS name present 
INDEX given 'STRING' & NO. CHARS name not present 

'STRING' & ATTRIBUTE given INDEX name present 

*NAME NOT FOUND* ERROR 
*TABLE FULL* ERROR 



Registers Modified: 

A & PSW 



RAM Required: 

Dependant on No. of names & size 



ROM Required: 

285! 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

ISIS-II Macro Assembler 



Programmer 



agrammer: 

M. G. Dineley 



Company: 

Dept. E. E. & E. UMIST 



Address: 

Sackville St. 



City: 

Manchester England 



State: 



© Intel Corporation, 1976 

10/78 



98-034D 

4-671 



insite 



Ref.#AB136 



INTEL 8 USER'S LIBRARY SUBMITTAL FORM 



04004/4040 08008 El 8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



input 
Parameters 



Output 
Results 



IDENT1 - FRONT PAGE IDENTIFIER PRINT PROGRAM 

The program prompts the operator to furnish the date, disk 
identification, filename and programmer's name. The program then 
composes and prints an identification front page as a cover page 
for the program listing which follows it. 



INTELLEC MDS with floppy disk (dual) drive and line printer. 



ISIS-II 



The program does not interact with other programs. 



Registers Modified: 


Programmer: 

Phil Greenberq 


RAM Required: 

3950 = 0F7EH 


Company: 

Conrac Corp. - Plant 3 


ROM Required: 

None 


Address: 

32 Fairfield Place 


Maximum Subroutine Nesting Level: 

N/A 


City: 

West Caldwell 


Assembler/Compiler Used: 

INTELLEC MDS Macro Assembler 


State. 

New Jerspy runnfi 



© Intel Corporation, 1976 

10/78 



98-034D 

4-679 



Ref.#AE17 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 KI8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



CERROR - PL/M-80 COMPILER ERROR DISPLAY PROGRAM 

Program displays PL/M-80 Compiler Errors 

Assembled program must be linked with System. LIB and located above 

ISIS-II. Program resides on system diskette. 



MDS 800, D0S-2DS, TTY or CRT 



ISIS-II 



Command CERROR :FX:Name.LST 



All PL/M Compiler errors are copied on :C0: 



Registers Modified: 

All registers 



RAM Required: 

13B H 



ROM Required: 

None 



Maximum Subroutine Nesting Level: 

3 



Assembler/Compiler Used: 

8080/8085 Macro Assembler 



Programmer: 

Prof. Ing. Dalibor Nemec 



Company: 

VSE- Dept. of Technology 



Address: 

Pelhrimovska 9, Praha 4, 



City: 

Czechoslov 



State: 



© Intel Corporation. 1976 

10/78 



98-034D 



4-673 



Ref.# AE17 



ASM80 :F1:CERR0R.SRC 



ISIS-II 8888/8085 MACRO ASSEMBLER, V2. 8 



CERROR PAGE 



LOC OBJ 




SEQ 


SOURCE STATEMENT 








1 ; 

2 * 


TITLECPL/M-80 COMPILER ERRORS') 






3 

4 ; 
5 


NAME CERROR 




0800 




OPEN EQU 




0003 




6 


READ ECU 3 




0089 




7 


EXIT EQU 9 




000C 




8 


ERROR EQU 12 




aoou 
Own 




9 


LF EQU 0AH 




000D 




10 


CR EQU 8DH 




F809 




11 

12 i 
13 


130 EQU 8F809H 


MONITOR ROUTINE ADDRESS 






EXTRN ISIS 








14 ; 










15 


CSEG 




0000 310600 


S 


16 BEGIN: 


LXI SP, STACK 


ADJUST STACK POINTER 


0003 0E03 




17 


MVI CREAD 


READ NAME OF LIST 


0005 110000 





18 


LXI D,RBLK 


FILE FROM :CI: 


0008 CD4900 


C 


19 


CALL SVSTEM 


INTO BUFFER 


0008 0E00 




20 


MVI COPEN 


OPEN LIST FILE 


000D 110H00 


D 


21 


LXI D,OBLK 


FOR READING 


0016 CD4900 


C 


22 


CALL SVSTEM 




0013 CD5F88 


c 


23 


CALL READBL 


READ BLOK INTO BUFFER 


0016 CD4200 


c 


24 LOOP: 


CALL CHAR 


PICK UP CHAR. FROM BUFFER 


0019 79 




25 


MOV A,C 




081fl FE0A 




26 


CPI LF 


<LF> LAST CHAR. ON LINE, SEQUENCE <CI 


001C C21600 


c 


27 


JN2 LOOP 


LOOP UNTIL LAST CHAR. 


001F CD4200 


c 


28 L0OP1: 


CALL CHAR 


PICK UP NEXT CHAR. 


8022 79 




29 


MOV A,C 




0023 FE2A 




38 


CPI "*'' 


BEGINNING OF COMPILER ERROR MESSAGE 


0025 CA3000 


c 


31 


JZ DISPCH 


DISPLAY ERR. MESSAGE 


0028 FE8D 




32 


CPI CR 


LINE ENDS <CR>, SEQUENCE <1FXCR> 


002ft C21680 


c 


33 


JN2 LOOP 


LOOP UNTIL LAST CHAR. 


002D C21F80 


c 


34 


JMP LOOP! 


TEST NEXT LINE 


0028 CD09F8 




35 DISPCH 


CALL CO 


DISPLAV FIRST CHAR. OF MESSAGE 


0833 CO4208 


c 


36 


CALL CHAR 


PICK UP SECOND CHAR. 


0036 79 




37 


MOV ft. C 




8037 FE0fl 




38 


CPI LF ; 


TEST IF END OF LINE 


0039 C23000 


c 


39 


JNZ DISPCH 


LOOP UNTIL END OF COMPILER MESSAGE 


003C CD89F8 




48 


CALL CO ; 


DISPLAV LAST CHAR ON LINE 


802F C31F88 


c 


41 

42 ; 

43 CHAR: 


JMP L00P1 ; 


TEST NEW LINE 


0042 23 




INX H ; 


ADDRESS NEXT CHAR 


0843 4E 




44 


MOV CM ; 


PICK UP CHAR FROM BUFFER 


0044 85 




45 


DCR B ; 


IF BUFFER EMPTY READ 


0045 CC5F80 


c 


46 


CZ READBL 


NEW BLOCK 


8848 C9 




47 
48 ; 


RET 




0049CD6800 


E 


49 SVSTEM 


CALL ISIS 




804C 2A2080 


D 


50 


LDA STATUS ; 


TEST ERROR STATUS 


004F B7 




51 


ORA A 




0850 C27600 


c 


52 


JNZ ERR ; 


BRANCH TO ERROR ROUTINE 






10/78 





4-675 



ISIS-II 8888/8885 MACRO ASSEMBLER, 
PL/M-80 COMPILER ERRORS 



VZ8 



CERROR PAGE 



LOC OBJ 



SEQ 



SOURCE STATEMENT 



8853 C9 

8854 8E8D 
8856 CD69F8 
8859 8E8A 
885B CD09F8 

&85E C9 

8o5r C5 
8968 8E83 
8862 111488 D 
8865 CD4989 C 
6868 2A9C88 D 
086B 7C 
886L Bo 

886D CA7E88 C 
8878 Ci 
887147 

8872 212108 D 
0875 C9 

8876 8EK 
8878 111E88 D 
887B CD8888 E 

887E CD5488 C 
8881 8E89 

8883 111E88 D 

8086 CD8880 E 



8888 8188 
8882 2288 
0004 7A88 
8886 9C88 
8888 2680 



888A I486 
888C2288 
root 0X08 
8810 0088 
8812 2888 



8862 

8816 2280 
8818 7A88 
891A 9C00 
881C 2888 



881E 2888 

8882 

887A 



53 

54 ; 

55NLINE: 

56 

57 

58 

59 

68; 

61READBL: 

62 

63 

64 

65 

66 

67 

68 

69 

78 

71 

72 

73 ; 

74 ERR: 
75 

76 

77 ; 

78 DONE: 
79 

88 

81 

82 ; 

83 

84 RBLK: 

85 

86 

87 

88 

89 ; 

98 OBLK: 

91 

92 

93 

94 

95; 

96 RBLKi: 

97 AFTN: 
98 

99 
188 
181 

182 * 

183 DBLK: 

184 EBLK: 
195 STATUS 

186 BUFFER 

187 ACTUAL 



RET 

MVI C,CR 
CALL CO 
MVI C,LF 
CALL CO 
RET 

PUSHB 
MVI CREAD 
LXI D, RBLKI 
CALL SYSTEM 
LHLD ACTUAL 
MOV &h 
ORA L 
JZ DONE 
POPB 
MOVB,A 
LXI H,BUFFER-i 
RET 

MVI CERROR 
LXI D,EBLK 
CALL ISIS 

CALL NLINE 
MVI C, EXIT 
LXI D,DBLK 
CALL ISIS 

DSEG 
DM 1 

m BUFFER 
DM 122 
DM ACTUAL 
DM STATUS 

DM AFTN 

DM BUFFER 

DH1 

DH0 

DM STATUS 



DS 2 

DM BUFFER 
DM 122 
DM ACTUAL 
DM STATUS 



DM STATUS 
DS 2 
DS 122 
DS 2 
10/78 



INSERT <CCR> INTO DISPLAY BUFF 
DISPLAY CHAR 

INSERT <LF> INTO DISPLAY BUFF 
DISPLAY CHAR 



SAVE LAST CHAR FROM LAST BLOCK IN C REG 
READ NEH BLOCK FROM 
LIST FILE INTO BUFFER 

IF ALL BLOCKS OF LIST 
FILE ALREADY READ 
THEN ACTUAL=0 

RESTORE C REG 

NUMBER OF CHARS READ INTO BUFFER 

BUFFER ADDERSSING 



; DISPLAY SYSTEM ERROR NUMBER 



SEPARATE HITH ONE LINE 

CLOSE LIST FILE 

AND RETURN TO SUPERVISOR 



; READ CONSOLE 



FILE TO BE OPEN 
FOR READING 



; READ BLOCK FROM FILE 



; LENGTH OF BUFFER 



4-676 



ISIS-II 8888/8885 MACROASSEMBLER, V2. 8 CERROR PfiGE 3 
PL/M-88 COMPILER ERRORS 

LOC OBJ SEQ SOURCE STATEMENT 

188 STKLN 16 ; DEPTH OF STACK 

189 ; 
C 118 EM) BEGIN 



PUBLIC SVMBOLS 



EXTERNAL SVMBOLS 
ISIS E 



USER SVMBOLS 

ACTUAL D889C AFTN D 8814 BEGIN C 8888 BUFFER D 8622 CHAR C 8842 CO A F889 CR A 888D 

DBLK D881E DISPCH C 8828 DONE C 887E EBLK D 881E ERR C 8876 ERROR A 888C EXIT A 8889 

ISIS E8888 LF A 888A LOOP C 8816 LOOP! C 881F NLINE C 8854 OBLK D 888A OPEN A 8888 

RBLK D 8866 RBLK1 D 8814 READ A 8862 READBL C 885F STATUS D 8828 SVSTEM C 8849 

ASSEMBLV COMPLETE.. NO ERRORS 



10/78 4 _ 677 



insite 



Ref.#AB136 



INTEL 8 USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 4004/4040 D8008 B8080 D8048 D8085 D Other. 



(use additional sheets if necessary) 



IDENT1 - FRONT PAGE IDENTIFIER PRINT PROGRAM 

The program prompts the operator to furnish the date, disk 
identification, filename and programmer's name. The program then 
composes and prints an identification front page as a cover page 
for the program listing which follows it. 



INTELLEC MDS with floppy disk (dual) drive and line printer. 



rsis-n 



The program does not interact with other programs. 



Registers Modified: 



RAM Required: 

3950 = 0F7EH 



ROM Required: 

None 



laximum Subroutine Nesting Level: 



Assembler/Compiler Used: 

INTELLEC MDS Macro Assembler 



Programmer: 

Phil Greenberq 



Company: 

Conrac Corp. - Plant 3 



Address: 

3? Fairfield Place 



City: 

West Caldwell 



State. 

New Jprsp y 07006 



© Intel Corporation, 1976 

10/78 



4-678 



insite 



Ref.#AB137 



INTEL* USERS LIBRARY SUBMITTAL FORM 



Program 

Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 B 8080/8085 D 8086 Other _i£BC_SQ/2I) (uM wMUaM ^. „ nmctu ^ 



MON830 - Monitor for iSBC 80/30 

2K Debug monitor for iSBC 80/30. Provides simple memory and register 
display and modification commands as well as program execution with 
breakpoints. The monitor also provides the user with routines for 
performing console I/O and paper tape I/O. 



iSBC 80/30 plus console device 



None 



a string of ASCI 



None. At system power up, monitor will wait for 
'u's to be typed on the console device, to determine the" baud rate 
of the terminal. After this, a banner is output and command mode 
is entered. Commands are implemented for memory/register display/ 
modification, execution with and without single stepping and 
breakpoints, and paper tape program load/save. 



Available on non-system 
diskette only for $35.00 
(source & object code 
incl uded) 



Registers Modified: 



Al I 



RAM Required: 



96 



ROM Required: 



2040 



Maximum Subroutine Nesting Level: g 



Assembler/Compiler Used: 



MDS Macro Assembler 



Programmer: 



Company: 



Address: 



City: 



State: 



© Intel Corporation, 1978 

12/78 



98034 E 

4-679 



Ref.#AB138 



insite 



INTEL 8 USER'S LIBRARY SUBMITTAL FORM 



D 4004/4040 D8008 D8080 08048 D8085 H Other UPI-41 (use additional sheets if necessary) 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



UPI-41 8-DIGIT LED DISPLAY CONTROLLER 

This program uses the UPI-41 as a LED Display Controller 
which scans and refreshes eight multiplexed seven-segment 
LED Displays. The characters are defined by input from the 
master microprocessor in the form of an eight bit word per 
digit-character selection. A total of 32 different alpha- 
numeric characters are available for display. Applications; 
clock or temperature readout, various message displays. 

All information pertaining to required hardware, software, 
input parameters and output results are fully documented 
in the Intel application note AP 41 ("INTRODUCTION TO THE 
UPI-41A") and the listing for this program. 



Registers Modified: 



A. RBI R0. R2.R3.R7 



RAM Required: (within UPI - 41) 

EH f see AP 41 ) 



ROM Required: 



J3R 



(within UPI-41 
(see AP 41 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



ASM48 M0D41 



Programmer: 



Company: 



Robin J. Jigour 



.Jjllfil. 



Address: 



City: 



State: 



© Intel Corporation, 1976 

12/78 



98-034D 
4-680 



RSM48 :F1:LED41SRC M0D41 TITLE ('AUGUST 38 1978') 



Ref.#AB138 



ISIS-II MCS-48/UPI-41 MACRO ASSEMBLER, X187 
AUGUST 38 1978 



PAGE 



loc cbj 



SEQ 



SOURCE STATEMENT 



1 

2 

3 

4 

5 

6 

7 

8 

9 

18 

11 

12 

13 

14 

15 

16 

17 

18 

19 

28 

21 

22 

23 

24 

25 

26 

27 

28 

29 

38 

31 

32 

33 

34 



* UPI-41 8-DIGIT LED DISPLAY CONTROLLER * 



THIS PROGRAM USES THE UPI-41 AS A LED DISPLAV CONTROLLER 
WHICH SCANS AND REFRESHES EIGHT SEVEN-SEGMENT LED DISPLAYS 
THE CHARACTERS ARE DEFINED BY INPUT FROM A MASTER CPU IN THE 
FORM OF ONE EIGHT BIT WORD PER DIGIT-CHARACTER SELECTION 



REGISTER DEFINITIONS. 
REGISTER 



RO 
Rl 
R2 
R3 
R4 
R5 
R6 
R7 



RBI RB8 

DISPLAY MAP POINTER NOT USED 

NOT USED NOT USED 
DATA WORD AND CHARACTER STORAGE NOT USED 

DIGIT COUNTER NOT USED 

NOT USED NOT USED 

NOT USED NOT USED 

NOT USED NOT USED 

ACCUMULATOR STORAGE NOT USED 



**>M*M^*!M<**tt'**^^ 



PORT PIN DEFINITIONS: 

PIN PORT 1 FUNCTION 



PORT 2 FUNCTION 



P8-7 



SEGMENT DRIVER CONTROL DIGIT DRIVER CONTROL 



$EJECT 
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LOC OBJ 



SEQ 



SOURCE STATEMENT 



25 

36 

37 

38 

39 

49 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

71 

78 

79 

80 

81 

82 

83 

84 

85 

86 

87 



89 $EJECT 



********************* 

DISPLAY DATA WORD BIT 
BIT 

8-4 
5-7 

CHARACTER SELECT: 

D4 D3 



8 



8 

8 





8 

















DEFINITION: 
FUNCTION 

CHARACTER SELECT 
DIGIT SELECT 



D2 Dl D0 CHARACTER 



DIGIT SELECT 










8 

1 
1 
1 

1 




8 
1 
1 
1 
1 














D7 D6 

8 

8 8 

8 1 

8 1 

1 8 

1 





1 

1 
1 1 



1 

1 

1 1 



1 

1 
1 1 



8 1 

1 8 

1 1 




1 



8 

1 

1 

1 1 



9 8 




1 
2 
3 
4 
5 
6 
7 
8 
9 
A 
B 
C 
D 
E 
F 

G 
H 
I 
J 
L 
N 

P 
R 
T 
U 
V 



"BLANK" 



D5 DIGIT NUMBER 
8 

i 
1 



1 

8 
1 

8 
1 
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LOC OBJ 



FFF1 



0000 



0002 00 

0803 0438 

0005 80 

0006 00 

8007 841F 



8009 
000H 

900C 

000E 
0010 
0011 

0012 
08O 

0015 
9017 
0019 
001fl 
001B 

eeic 



re 

8A88 

8838 

23FF 

A0 

18 

F8 

629E 



23F1 

62 

55 

1C 

05 



001P 84iD 



SEQ 

99 
91 
92 
93 
94 
95 
96 
97 
98 
99 
180 

101 

102 

103 
104 
105 
106 
197 
108 
189 
110 
111 
112 
113 
114 
115 

lie 

117 

118 
119 
120 
121 
122 
123 
124 
12-5 
126 
127 
Leo 

129 
130 
131 

132 
133 
134 
135 
136 
137 
138 
139 



SOURCE STATEMENT 

' EQUATES 

;THE FOLLOWING CODE DESIGNATES "TIME' AS A VARIABLE THIS 

i ADJUSTS THE AMOUNT OF CYCLES THE TIMER COUNTS BEFORE 

,A TIMER INTERRUPT OCCURS AND REFRESHES THE DISPLAY APPROXIMATELY 

.= 58 TIMES PER SECOND. 

TIME EQU -0FH , TIMER VALUE 2. 5MSEC 

INTERRUPT BRANCHING 
•THIS PORTION OF MEMORY IS DEDICATED FOR USE OF RESET AND 
i INTERRUPT BRANCHING. WHEN THE INTERRUPTS ARE ENABLED THE 
i CODE AT THE FOLLOWING DESIGNATED SPOTS ARE EXECUTED WHEN A 
■ RESET OR A INTERRUPT OCCURS. 
ORG 

RESET 



JMP 
NOP 
JMP 
NOP 
NOP 
JMP 



START 



INPUT 



DISPLA 



IBF INTERRUPT 



J TIMER INTERRUPT 

INITIALIZATION 
■THE FOLLOWING CODE SETS UP THE UPI-41 AND DISPLAY HARDWARE 

■ INTO OPERATIONAL FORMAT. THE DISPLAY IS TURNED OFF, THE DISPLAY 
■MAP IS FILLED WITH "BLANK" CHARACTERS THE TIMER SET AND THE 

■ INTERRUPTS APE ENABLED. 



START: 



SEL 

OKI 

MOV 

MOV 

MOV 

INC 

MOV 

JB5 

MOV 

MOV 

MOV 

STRT 

EN 

EN 



RBI 

P2, #08H 
R0.. #38H 
K, #0FFH 

Re 

A, PA 

BLKMAP 

R3,#90H 

A,#TIFfc 

T,A 

T 

TCNTI 

I 



; TURN DIGIT DRIERS OFF 
.DISPLAY MAP POINTER, BOTTOM OF DISPLAY MAP 
BLKMAP • MOV K,#0FFH .;FF="BLANK" 

; BLANK TO DISPLAY MAP 

; INCREMENT DISPLAY MAP POINTER 

* DISPLAY MAP POINTER TO ACCUMULATOR 

j BLANK DISPLAY MAP TILL FILLED 

; SET DIGIT COUNTER TO B 

; TIMER VALUE 

-■ LOAD TIMER 

■ START TIMER 

i ENABLE TIMER INTERRUPT 

> ENABLE IBF INTERRUPT 

USER PROGRAM 
>f> USER? PPOGPflM WOULD INITIALIZE AT THIS POINT. THE FOLLOWING 
,C0C€ IS USED Tft TfiKE THE PLACE OF A POSSIBLE USER PROGRAM. 



LOOP JMF LOOP , wait F0R INTERRUPT 

tEJECT 
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LOC OBJ 



SEQ 



SOURCE STATEMENT 



981F D5 
9028 AF 



8823 FB 

8824 4338 

8826 R8 

8827 F8 

8828 39 

8829 FB 
882ft 3ft 
882B IB 
882C D38? 
882E 9632 
8838 BB88 
8832 23F1 

8834 62 

8835 55 

8836 FF 

8837 93 



148 

141 

142 

143 

144 

145 

146 

147 

148 

149 

158 DISPLfl 

151 

152 

153 

154 

155 

156 

157 

158 

159 

168 

161 

162 

163 

164 SEINE: 

165 

166 

167 

168 



DISPLAY ROUTINE 
THIS PORTION OF THIS PROGRAM IS AN INTERRUPT ROUTINE WHICH IS 
ACTED UPON WHEN THE TIMER COUNT IS COMPLETED. THE ROUTINE UPDATES 
ONE DISPLAY DIGIT FROM THE DISPLAY MAP PER INTERRUPT SEQUENTIALLY, 
THUS EIGHT TIMER INTERRUPTS MILL HAVE REFRESHED THE ENTIRE DISPLAY 
REGISTER BANK 1 IS SELECTED AND THE ACCUMULATOR IS SAVED UPON 
ENTERING THE ROUTINE. ONCE THE DISPLAY HAS BEEN REFRESHED THE TIMER 
IS RESET AND THE ACCUMULATOR AND PRE-INTERRUPT REGISTER BANK IS kESTORED 



SEL 

MOV 

ORL 

MOV 

ORL 

MOV 

MOV 

OUTL 

MOV 

OUTL 

INC 

XRL 

JNZ 

NOV 

MOV 

MOV 

STRT 

MOV 

RETR 



RBI 

R7,fl 

P2,#88H 

A,R3 

a#38H 

R8,A 

A,8R8 

PI, A 

&R3 

P2,A 

R3 

A,#87H 

SETIME 

R3,#88H 

A,#TIME 

LA 

T 

ft,R7 



REGISTER BANK 1 

SAVE ACCUMULATOR 

TURN DIGIT DRIVERS OFF 

DIGIT COUNTER TO ACCUMULATOR 

■OR" TO GET DISPLAY MAP ADDRESS 

DISPLAY MAP POINTER 

GET CHARACTER FROM DISPLAY MAP 

OUTPUT CHARACTER TO SEGMENT DRIVERS 

DIGIT COUNTER VALUE TO ACCUMULATOR 

OUTPUT TO DIGIT DRIVERS 

INCREMENT DIGIT COUNTER 

CHECK IF AT LAST DIGIT 

RESET TIMER IN NOT LAST DIGIT 

RESET DIGIT COUNTER 

TIMER VALUE 

LOAD TIMER 

START TIMER 

RESTORE ACCUMULATOR 

RETURN 



169 .; *****im*********m***Hr**** 
178 IEJECT 
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SEQ 



SOURCE STATEMENT 



171 ; 

173 ; INPUT CHflRflCTER AND DIGIT ROUTINE 

174 ; THIS PORTION OF THE PROGRAM IS AN INTERRUPT ROUTINE HH1CH 

175 ; IS ACTED UPON WHEN THE IBF BIT IS SET. THE ROUTINE GETS THE 

176 ;DISPLAV DATA HORD FROM THE DBB AND DEFINES BOTH 1HE DIGIT AND 

177 ;THE CHARACTER TO BE DISPLAYED THIS IS DONE BY MEANS OF A 

178 ; CHARACTER LOOP-UP TABLE AND A DISPLAY MAP FOR DIGIT AND CHARACTER 

179 ; LOCATION SPECIAL CONSIDERATION IS TAKEN FOR A DECIMAL POINT WHICH IS 
189 ; SIMPLY ADDED TO THE EXISTING CHARACTER IN THE DISPLAY MAP. REGISTER 

181 ; BANK 1 IS SELECTED AND THE ACCUMULATOR IS SAVED' UPON ENTERING 

182 ; THE ROUTINE. ONCE THE DATA HORD HAS BEEN FULLY DEFINED THE ACCUMULATOR 

183 > AND THE PRE-INTERRUPT REGISTER BANK IS RESTORED. 

184 i 

; REGISTER BANK 1 

SAVE ACCUMULATOR 
GET DATA 
SAVE DATA HORD 
DEFINE DIGIT LOCftl ION 



DIGIT LOCATION IN DIGIT POINTER 

SAVED DATA HORD TO ACCUMULAIOR 

DEFINE CHARACTER LOOK-UP-TABLE LOC. 

GET CHARACTER 

SAVE CHARACTER 

IS CHARACTER DECIMAL POINT 

SAVED CHARACTER TO ACCUMULATOR 
CHARACTER TO DISPLAY MAP 

SAVED CHARACTER TO ACCUMULATOR 
"AND" WITH OLD CHARACTER 
BACK TO DISPLAY MAP 
RESTORE ACCUMULATOR 



0638 D5 


185 INPUT: 


SEL 


RBI 


9839 AF 


186 


MOV 


R7,A 


003A 22 


187 


IN 


ft, DBB 


0B3B AA 


188 


MOV 


R2,A 


093C 47 


189 


SWAP 


A 


003D 77 


190 


RR 


A 


083E 5307 


191 


ANL 


ft,#87H 


0040 4338 


192 


ORL 


fl#38H 


0042 A8 


193 


MOV 


R8,A 


8943 FA 


194 


MOV 


A,R2 


9044 531F 


195 


ANL 


A,#1FH 


B046 B 


196 


M0VP3 


lu en 


0047 AA 


197 


MOV 


RZA 


9048 D37F 


198 


XRL 


A,#7FH 


004A C650 


199 


JZ 


DPOINT 


004C FA 


200 


MOV 


A,R2 


004D A0 


201 


MOV 


SR8, A 


004E 0453 


202 


JMP 


RETURN 


9850 FA 


203 DPOINT: 


MOV 


R.R2 


0051 50 


204 


ANL 


ft,0R0 


0052 A0 


205 


MOV 


Hffl,A 


9853 FF 


206 RETURN: 


MOV 


AR7 


0054 93 


287 


RETR 






208 i ******WWWcp 






209$EJECT 
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SEQ 



SOURCE STATEMENT 



216 .; *******m**w*«***********M«MHW^ 

211 i LOOK-UP TABLE 

212 ; THIS LOOK-UP TABLE ORIGINATES IN PAGE 3 OF THE UPI-41 PROGRAM 

213 .; MEMORY. IT IS USED TO DEFINE THE CORRECT LEVEL OF EACH SEGMENT 

214 ; AND DECIMAL POINT FOR A SELECTED CHARACTER FROM THE INPUT ROUTINE 

215 ; INVERSE LOGIC IS USED BECAUSE OF THE SPECIFIC DRIVER CIRCUITRY, THUS 

216 ;fl 1 ON A GIVEN SEGMENT MEANS IT IS OFF AND A MEANS IT IS ON 

217 ; 





218 






; *******SEGMENTS******** 


0300 


219 


ORG 


308H 


;DP 


G 


F 


E 


D 


C B A 


0390 C8 


228 CH0 


DB 


0C0H 


,1 


1 





8 








0381 F9 


221 CHI 


DB 


8F9H 


;1 


1 


1 


1 


1 


8 8 1 


0302 A4 


222 CH2 


DB 


0A4H 


il 


8 


1 








18 8 


0303 BB 


223 CH3 


DB 


8B9H 


il 


8 


1 


1 





8 8 


0384 99 


224 CH4 


DB 


99H 


;1 


8 





1 


1 


8 1 


0385 92 


225 CHS 


DB 


92H 


;1 


8 





1 





1 


0306 82 


226 CH6 


DB 


82H 


il 


8 











8 18 


0307 F8 


227 CH7 


DB 


8F8H 


il 


1 


1 


1 


1 


8 


0308 80 


228 CHS 


DB 


88H 


;i 

















0309 98 


229 CH9 


DB 


98H 


,1 


8 


8 


1 


1 





030A88 


238 CHA 


DB 


88H 


>l 


8 


8 





1 


8 


830B 83 


231 CHB 


DB 


83H 


;1 





8 








1 1 


038C C6 


232 CHC 


DB 


8C6H 


,1 


1 


8 








110 


030D Al 


233 CHD 


DB 


8A1H 


;1 


8 


1 








1 


038E 86 


234 CHE 


DB 


86H 


il 


8 


8 








110 


038F8E 


235 CHF 


DB 


8EH 


;1 


8 


8 





1 


110 


0310 7F 


236 CHDf 


»: DB 


7FH 


;0 


1 


1 


1 


1 


1 1 1 


0311 C2 


237 CHG 


DB 


8C2H 


Jl 


1 


8 








1 


0312 89 


238 CHH 


DB 


89H 


;1 





8 





1 


1 


8313 FB 


239 CHI 


DB 


8FBH 


A 


1 


1 


1 


1 


11 


0314 El 


240 CHJ 


DB 


8E1H 


il 


1 


1 








1 


0315 C7 


241 CHL 


DB 


8C7H 


il 


1 











1 1 1 


0316 AB 


242 CHN 


DB 


wtdH 


;1 


8 


1 





1 


11 


8317 A3 


243 CHO 


DB 


0A3H 


il 





1 








11 


8318 8C 


244 CHP 


DB 


8CH 


;1 











1 


10 


0319 AF 


245 CHR 


DB 


8AFH 


;1 





1 





1 


111 


031A 87 


246 CHT: 


DB 


87H 


;1 


8 











1 1 1 


031B CI 


247 CHU: 


DB 


8C1H 


il 


1 











1 


831C 91 


248 CHV: 


DB 


91H 


il 








1 


e 


e e i 


831DBF 


249CHDR 


SH: DB 


8BFH 


il 


8 


1 


1 


i 


i i i 


031E FD 


258 CHAP 


OS: DB 


8FDH 


il 


1 


1 


1 


i 


1 8 1 


031F FF 


251BLAN 


K: DB 


8FFH 


,1 


1 


1 


1 


i 


i i i 



252 ;*«**«*m*w<******^^ 

253 END 



USER SYMBOLS 
























BLANK 031F 


BLKMAP 880E 


CH0 9286 


CHI 


8301 


CH2 


8382 


CH2 8383 


CH4 


8384 


CHS 


0385 


CH6 8386 


CH7 8387 


CHB 0308 


CH9 


0389 


CHA 


838A 


CHflPOS 031E 


CHB 


830B 


CHC 


830C 


CHD 030D 


CHDASH 031D 


CHDP 8318 


CHE 


938E 


CHF 


839F 


CHG 8311 


CHH 


0312 


CHI 


6313 


CHJ 8314 


CHL 8315 


CHN 0316 


CHO 


8317 


CHP 


8318 


CHR 0319 


CHI 


831A 


CHU 


831B 


CHY 831C 


DISPLA 801F 


DPOINT 0058 


INPUT 


8838 


LOOP 


801D 


RETURN 0053 


SETINE 8832 


START 


8889 


TIME FFF1 

























ASSEMBLY COMPLETE, NO ERRORS 
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Ref . #AB1 39 



insite 



INTEL USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 

Parameters 



Output 
Results 



□ 4004/4040 L18008 D8080 08048 D8085 BOther UP T -41 A 



(use additional sheets if necessary) 



UPI-41A SENSOR MATRIX CONTROLLER 

This program uses the UPI-41A as a Sensor Matrix Controller. 
It has monitoring capabilities of up to 128 sensors. The 
coordinate and sensor status of each detected change is 
available to the master microprocessor in a single byte. 
A 40X8 FIFO queue is provided for data buffering. Both' 
hardware or polled interrupt methods can be used to notify 
the master of a detected sensor change. Applications; alarm 
systems, control panels, various keyboards. 

All information pertaining to required hardware, software, 
input parameters and output results are fully documented in 
the Intel application note AP41 ("INTRODUCTION TO THE 
UPI-41A") and the listing for this program. 



Registers Modified: 



A.STS ^RBfl Rj fl-P7 



RAM Required: (within UPI-41A) 

3FHfsee AP41J 

ROM Required: (within UPI-41A) 

9EH(see AP411 



Maximum Subroutine Nesting Level: 



None 



Assembler/Compiler Used: 



ASM48 MOD42 



Programmer: 



Company: 



Rnhin J. J-jarmr 



Intel 



Address: 



City: 



(Internal Use Only! 



State: 



© Intel Corporation, 1976 
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RSM48 :Fi: SENSOR. SRC MQD42 TITLE ('AUGUST 39 1378') 



ISIS-II NCS-48/UPI-41 MACRO ASSEMBLER, X197 
HUGUST 30 1978 



Ref#AB139 



PAGE 1 



LOC OBJ 



SEQ 

1 

2 

3 

4 

5 

6 

7 

8 

9 

19 

11 

12 

13 

14 

15 

16 

17 

18 

19 

28 

21 

22 

23 

24 

25 

26 

27 

28 

29 

38 

31 

32 

33 

34 

35 

36 

37 

38 

39 



SOURCE STATEMENT 

* UPI-41A SENSOR MATRIX CONTROLLER * 

THIS PROGRAM USES THE UPI-41A AS A SENSOR MATRIX CONTROLLER 
IT HAS MONITORING CAPABILITIES OF UP TO 128 SENSORS. 1HE COORDINATE 
AND SENSOR STATUS OF EACH DETECTED CHANGE IS AVAILABLE TO THE MASTER 
MICROPROCESSOR IN A SINGLE BYTE. A 40X8 FIFO QUEUE IS PROVIDED FOR 
DATA BUFFERING BOTH HARDWARE OR POLLED INTERRUPT METHODS CAN BE IKED 
TO NOTIFY THE MASTER OF A DETECTED SENSOR CHANGE 



REGISTER DEFINITIONS: 
REGISTER 



RBQ 

R8 MATRIX MAP POINTER 

Rl FIFO POINTER 

R2 SCAN ROM SELECT 

R3 COLUMN COUNTER 

R4 FIFO-IN 

R5 FIFO-OUT 

R6 CHANGE WORD 

R7 COMPARE 



RBI 

NOT USED 
NOl USED 
NOT USED 
NOT USED 
NOT USED 
NOT USED 
NOT USED 
NOT USED 



PORT PIN DEFINITIONS: 



PIN PORT 1 FUNCTION PIN 

P6-7 COLUMN LINE INPUTS P8-3 

P4 
P5 
P6-7 



PORT 2 FUNCTION 

ROW SELECT OUTPUTS 
FIFO NOT EMPTY INTERRUPT 
OBF INTERRUPT 
NOT USED 



***w***m****m**mm*^**^^ 



iEJECT 
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AUGUST 38 1978 

LOC OBJ SE8 SOURCE STATEMENT 

41 ; 

42 ; CHANGE WORD BIT DEFINITION: 
42; 

44 ; BIT FUNCTION 

45 ; — 

46 i D8-6 SENSOR COORDINATE 

47 ; D7 SENSOR STATUS 

48 ; 

58 ; 

51 ; STATUS REGISTER BIT DEFINITION. 

52 ; 

53 i BIT FUNCTION 

55 ; m OBF 

56 ; Dl-3 IBF, F8, Fl (NOT USED) 

57 ; D4 FIFO NOT EMPTV 

58 ; D5-7 USED DEFINED (NOT USED) 

59 ; 

61 ; 

62 ; EQUATES 

63 ; 

64 ;THE FOLLOWING CODE DESIGNATES THREE VARIABLES; SCANTM, FIFOBA 

65 ;AND FIFOTA. SCANTN ADJUSTS THE LENGTH OF A DELAY BETMEEN 

66 ; SCANNING SWITCH THIS SIMULATES DEBOUNCE FUNCTIONS. FIFOBA 

67 ; IS THE BOTTOM ADDRESS OF THE FIFO. FIFOTfl IS THE TOP ADDRESS 

68 ; OF THE FIFO. THIS MAKES IT POSSIBLE TO HAVE A FIFO 3 TO 48 
6i;BVTES IN LENGTH. 

78; 

72 ; 



8888 
882F 


73SCANTM 

74 FIFOBA 

75 FIFOTA 

76 i 

77 *EJECT 


EQU 
EQU 

EQU 


8FH 
88H 

2FH 


,SCAN TIME ADJUST 
;FIFO BOTTOM ADDRESS 
;FIFO TOP ADDRESS 
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LOC OBJ 



SEQ 



SOURCE STATEMENT 



8886 

8888 B83F 
8882 BR8F 
8884 BC88 
8886 BD2F 
8888 89FF 
888A 2388 

(HOT* QO 

8800 FA 

9SX0K ?Q 
PWJt in 

088F 89 
8818 A8 

8811 FA 

8812 C618 
0814 C8 

0015 Cfl 

0016 848D 
8818 BR18 
881AFA 
801B 3A 
881C F5 



78 

79 

88 

81 

82 

83 

84 

85 

86 

87 

88 

89 

98 

91 

92 

93 

94 

95 

96 

97 

98 

99 

188 

181 

182 

183 

184 

105 

106 

107 

108 

189 

110 
111 

112 
113 

114 
115 



INITIALIZATION 

THE PROGRAM STARTS AT THE FOLLOWING CODE UPON RESET WITHIN 
THIS INITIALIZATION SECTION THE REGISTERS THAT MAINTAIN THE MATRIX 
MAP, FIFO AND ROM SCANNING ARE SET UP. PORT 1 IS SET HIGH FOR USE 
AS AN INPUT PORT FOR THE COLUMN STATUS. BIT 4 OF STATUS REGISTER IS 
WRITTEN TO CONVEY A FIFO EMPTY CONDITION. THE INITIAL COLUMN STA1US 
OF ALL THE ROMS IN THE SENSOR MATRIX IS THEN READ INTO THE MATRIX 
HAP. ONCE THE MATRIX MAP IS FILLED THE OBF INTERRUPT (PORT 2-4) IS 
ENABLED. 



ORG 
INITMX: MOV 
MOV 
MOV 
MOV 
ORL 
MOV 
MOV 
FILLMX: MOV 
OUTL 
IN 
MOV 
MOV 
JZ 
DEC 
DEC 
JMP 
OBFINT: MOV 
MOV 
OUTL 
EN 



8 

R8,#3FH 

R2,#8FH 

R4, #FIFOBA 

R5,#FIF0TA 

PLttFFH 

STS,A 

A,R2 

P2,A 

A, PI 

sR8j A 

A,R2 

OBFINT 

R8 

R2 

FILLMX 

R2,#18H 

A,R2 

P2,A 

FLAGS 



MATRIX MAP POINTER REGISTER, TOP ADDRESS 

SCAN ROW SELECT REGISTER, TOP ROW 

FIFO INPUT ADDRESS REGISTER, BOTTOM OF UFO 

FIFO OUTPUT ADDRESS REGISTER, TOP OF FIFO 

INITIALIZE PORT 1 HIGH FOR INPUTS 

INITIALIZE STATUS REGISTER, FIFO EMPTY 

WRITE TO STATUS REGISTER, BITS 4-7 

SCAN ROW SELECT TO ACCUMULATOR 

OUTPUT SCAN ROW SELECT TO PORT 2 

INPUT COLUMN STATUS PORT 1 

LOAD MATRIX MAP WITH COLUMN STATUS 

CHECK SCAN ROW SELECT REGISTER VALUE FOR 8 

IF ENABLE OBF INTERRUPT 

DECREMENT TO NEXT MATRIX MAP ADDRESS 

DECREMENT TO SCAN NEXT ROW 

FILL NEXT MATRIX MAP ADDRESS 

BIT 4 HIGH IN ROW SCAN SELECT REGISTER 

ROW SCAN SELECT VALUE TO ACCUMULATOR 

INITIALIZE PORT 2, BIT 4 FOR "EN FLAGS" 

ENABLE OBF INTERRUPT PORT 2, BIT 4 



fEJECT 
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PflGE 



LOC OBJ 



SEQ 



SOURCE STATEMENT 



116 ■, ♦♦»» ♦♦♦ » »»»»♦♦♦♦»» ***** * ** t+ * Wt*1 rt ***lf*ir*1r* *********#*^ 

117 ; 

118 ; SCAN AND COMPARE 

119 ; 
128 
121 
122 
123 
124 
125 
126 
127 



THE FOLLOWING CODE IS THE SCAN AND COMPARE SECTION OF THE PROGRAM. 
UPON ENTERING THIS SECTION A CHECK IS MADE TO SEE IF THE ENTIRE MATRIX 
HAS BEEN SCANNED. IF SO THE REGISTERS THAT MAINTAIN THE MATRIX MAP AND ROW 
SCANNING ARE RESET TO THE BEGINNING OF THE SENSOR MATRIX IF 1HE ENTIRE 
MATRIX HASNT BEEN SCANNED THE REGISTERS INCREMENT TO SCAN THE NEXT ROM. 
FROM THIS POINT ON THE ROM SCAN SELECT REGISTER IS USED FOR TWO FUNCTIONS. 
BITS 8-3 FOR SCANNING AND BITS 4 AND 5 FOR THE EXTERNAL INTERRUPTS. THUSLV 
ALL USAGE OF THE REGISTERS IS DONE BV LOGICRLLV MASKING IT SO AS 10 ONLY 

128 ; AFFECT THE FUNCTION DESIRED. ONCE THE REGISTERS ARE RESET, ONE ROM OF THE 

129 i SENSOR MATRIX IS SCANNED. A DELAV IS EXECUTED TO ADJUST FOR SCAN TIME 
138 i (DEBOUNCE). A BVTE OF COLUMN STATUS IS THEN READ INTO THE MATRIX MAP. 

131 ; AT THE TIME THE NEM COLUMN STATUS IS COMPARED TO THE OLD. 1HE RESULT IS 

132 ; STORED IN THE COMPARE REGISTER THE PROGRAM IS THEN ROUTED ACCORDING TO 

133 ; WHETHER OR NOT A CHANGE MAS DETEC1ED. 

134 i 

************************************* 



SCAN ROM SELECT TO ACCUMULATOR 

CHECK FOR 8 SCAN VALUE ONLY, NOT INTERRUPT 

IF 8 RESET REGISTERS 

DECREMENT MATRIX MAP POINTER 

DECREMENT SCAN ROM SELECT 

SCAN MATRIX 

RESET MATRIX Iff POINTER REGISTER, 10P ADDRESS 

SCAN ROW SELECT TO ACCUMULATOR 

RESET SCAN ROM SELECT, NO INTERRUPT CHANGE 

SCAN ROW SELECT REGISTER 

SCAN ROW SELECT TO ACCUMULATOR 

OUTPUT SCAN ROW SELECT 10 PORT 2 

SET DELAY FOR OUTPUT SCAN TIME 

DELAY 

INPUT COLUMN SlflTUS FROM PORT 1 TO ACCUMULATOR 

STORE NEW COLUMN STATUS SAVE OLD IN ACCUMULATOR 

COMPARE OLD WITH NEW COLUMN STATUS 

SAVE COMPARE RESUL1 IN COMPARE REGISTER 

IF THE SAME, CHECK IF FIFO IS FULL 





125 ;****** 








136 ; 






001D FA 


137 ADJREG: 


MOV 


A,R2 


881E 530F 


138 


ANL 


A,#8FH 


8020 C626 


139 


JZ 


RSETRG 


0022 C8 


148 


DEC 


R0 


8823 CA 


141 


DEC 


R2 


0824 042C 


142 


JMP 


SCANMX 


0826 B83F 


143 RSETRG: 


MOV 


R0,*3FH 


8828 FA 


144 


MOV 


A,R2 


8829 438F 


145 


ORL 


fttOFH 


002B AA 


146 


MOV 


R2,A 


082CFA 


147 SCANMX: 


MOV 


A,R2 


082D3A 


148 


OUTL 


P2,A 


082E BB8F 


149 


MOV 


R3,#SCANTM 


0038 EB38 


150 DELAY2: 


DJNZ 


R3,DELAY2 


8032 09 


151 


IN 


A, PI 


0033 20 


152 


XCH 


A,0R8 


0034 DO 


153 


XRL 


A,§R0 


8035 AF 


154 


MOV 


R7,A 


0036 C669 


155 

156 i 

157 *EJECT 


JZ 


CHFFUL 



12/78 



4-693 



ISIS-II MCS-48/UPI-41 MACRO ASSEMBLER, X187 
AUGUST 38 1978 



PAGE 



LOC OBJ 



SE9 



SOURCE STATEMENT 



159 ; 

168 ; CHANGE HORD ENCODING 

161 ; 

162 ; THE FOLLOHING CODE IS THE CHANGE WORD ENCODING SECTION. THIS 

163 ; SECTION IS ONLY EXECUTED IF A CHANGE HAS DETECTED. THE COLUMN COUNTER 
164; IS SET AND DECREMENTED TO DESIGNATE EACH OF THE 8 COLUMNS THE COMPARE 
165 ; REGISTER IS LOOKED AT ONE Bl I AT A TIME TO FIND THE EXACT LOCATION OF 
166;THECHANGE<S>. HHEN A CHANGE IS FOUND IT IS ENCODED BY GIVING IT A 

167 ; COORDINATE FOR ITS LOCATION. THIS IS DONE BY COMBINING THE PRESENT VALUE 

168 ; IN THE ROM SCAN SELECT REGISTER AND THE COLUMN COUNTER. THE ACTUAL STATUS 

169 (OF THAT SENSOR IS ESTABLISHED BY LOOKING AT THE CORRESPONDING BYTE IN 
178 ;THE MATRIX MAP. THIS STATUS IS COMBINED HITH THE COORDINATE TO ESTABLISH 

171 (THE CHANGE NORD. THE CHANGE WORD IS THEN STORED IN THE CHANGE WORD REGISTER. 

172 ; 

174; 

(SET COLUMN COUNTER REGISTER TO 8 

; DECREMENT COLUMN COUNTER 

; COLUMN STATUS TO ACCUMULATOR 

; ROTATE COLUMN STATUS RIGHT 

i ROTATED COLUMN STATUS BACK TO MATRIX MAP 

.COMPARE REGISTER VALUE TO ACCUMULATOR 

(ROTATE COMPARE VALUE RIGHT 

(ROTATED COMPARE VALUE TO COMPARE REGISTER 

(TEST BIT 7 IF CHANGE DETECTED ENCODE CHANGE WORD 

; IF NO CHANGE IS DETECTED CHECK FOR FIFO FULL 

(SCAN ROM SELECT 10 ACCUMULATOR 8888XXXX 

; ROTATE ONLY SCAN VALUE 

(ROTATE LEFT 888XXXX8 

(ROTATE LEFT 88XXXX88 

(ROTATE LEFT 8XXXX868 

(ESTABLISH MATRIX COORDINANT 8XXXXXXX 

; (OR) COLUMN COUNTER VALUE WITH ACCUMULATOR 

(SAVE COORDINANT IN CHANGE WORD REGISTER 

(COLUMN STATUS FROM MATRIX MAP TO ACCUMULATOR 

(8 ALL BITS BUT BIT 7 

■> (OR) SENSOR STATUS HITH COORDINATE FOR COMPLETED CHANGE WORD 

(SAVE CHANGE WORD XXXXXXXX 



8838 BB88 


175 


MOV 


R3,#88H 


883ACB 


176 RRLOOK 


DEC 


R3 


883BF8 


177 


MOV 


&8R8 


883C 77 


178 


RR 


A 


W3D A8 


179 


MOV 


§R8..A 


883EFF 


188 


MOV 


A,R7 


883F 77 


181 


RR 


A 


8848 AF 


182 


MOV 


R7,A ( 


8841 F245 


183 


JB7 


ENCODE ; 


8843 8469 


184 


JMP 


CHFFUL ( 


8845 FA 


185 ENCODE: 


MOV 


A,R2 ; 


8846 538F 


186 


ANL 


A,#8FH ; 


8848 E7 


187 


RL 


A 


8849 E7 


188 


RL 


A ; 


884A E7 


189 


RL 


fi ; 


8846 4B 


198 
191 


ORL 


A,R3 


884C AE 


192 


MOV 


R6,A ; 


884DF8 


193 


MOV 


A,8R8 


884E5388 


194 


ANL 


A,#88H ; 


8858 4E 


195 


ORL 


A,R6 ; 


8851 AE 


196 

197; 

198IEJECT 


MOV 


R6,A ; 
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LOC OBJ 



8952 FC 

8853 R9 

8854 FE 

8855 Al 

8856 2319 

8858 98 

8859 8R28 
885B Ffl 
985C 4328 
885E Aft 
895F 232F 
9861 DC 
8862 C667 

8864 1C 

8865 8469 
8867 BC88 
8869 FC 
886ft DD 
896B 967D 
886D 866D 
896F232F 
8971 DD 
8872 C677 

8874 ID 

8875 8479 

8877 BD88 
8879 FD 
887A ft9 

8878 Fl 
897C 92 
887DFB 
887E 963fi 
9889 2388 

8882 DC 

8883 C68C 

8885 FC 

8886 87 

8887 DD 

12/78 



SEQ 

199 

299 

281 

282 

283 

294 

285 

296 

287 

298 

289 

218 

211 

212 

213 

214 

215 

216 LOflDFF 

217 

218 

219 

228 STATNE 

221 

222 INTRH1 

223 

224 

225 

226 ftDJFIN: 

227 

228 

229 

238 

231 RSFFIN: 

232 CHFFUL: 
233 

234 

235 CHOBF1: 

236 flDJFOT: 
237 

238 
239 
248 

241 RSFFOT: 

242 LQftDDB: 
243 

244 

245 

246 CHCNTR: 

247 

248 CHFFEM: 

249 

258 

251 

252 

253 



SOURCE STATEMENT 

FIFO-DBBOUT MANAGEMENT 

1HE FOLLOWING CODE IS THE FIFO-DBBOUT MANAGEMENT SECTION OF THE 
PROGRAM. THIS SECTION TAKES AN ENCODED CHANGE WORD AND LOADS IT INTO 
THE FIFO. THE FIFO NOT EMPTY INTERRUPT IS THEN SET AND THE FIFO-IN 
POINTER GETS UPDATED. A FIFO FULL CONDITION IS THEN CHECKED FOP AND 
ROUTED ACCORDINGLY. IF BOTH THE FIFO AND OBF HAVE CHANGE WOPI* THE 
PROGRAM LOCKS UP UNTIL THIS HAS CHANGED. IF THE FIFO ISNT FULL COLUMN 
COUNTER= 8.. FIFO EMPTY AND OBF GONDII IONS ARE CHECKED THE FIFO-OUT 
POINTER IS SET AND DBBOUT IS LOADED IF THE FIFO ISNT EMPTY AND OBF ISNT 
SET. IF THIS ISNT THE SITUATION, PROGRAM FLOW IS ROUTED BACK 10 THE 
THE SCAN AND COMPARE SECTION TO SCAN THE NEXT ROW. 



. MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

ORL 

MOV 

ORL 

MOV 

MOV 

XRL 

JZ 

INC 

JMP 

MOV 

MOV 

XRL 

JNZ 

JOBF 

MOV 

XRL 

JZ 
INC 

JMP 

MOV 

MOV 

MOV 

MOV 

OUT 

MOV 

JNZ 

MOV 

XRL 

JZ 

MOV 

DEC 

XRL 



A,R4 

R1,A 

ft,R6 

8RLA 

A,#19H 

STS..A 

P2,#28H 

ft,R2 

A,#28H 

R2,A 

A, #FIFOTA 

ft,R4 

RSFFIN 

R4 

CHFFUL 

R4, #FIFOBA 

A,R4 

A,R5 

CHCNTR 

CH0BF1 

A,#FIFOTA 

A,R5 

RSFFOT 

R5 

L0ADD6 

R5, IFIFOBA 

ft,R5 

Ri,ft 

A,8R1 

DBB,A 

A, R3 

RRLOOK 

A, IFIFOBA 

A.R4 

ADJFEM 

A,R4 

A 

A,R5 



;FIFO INPUT ADDRESS TO ACCUMULATOR 

; FIFO POINTER USED FOR INPUT 

i CHANGE WORD TO ACCUMULATOR 

;LOAD FIFO AT FIFO INPUT ADDRESS 

.'BIT 4 FOR FIFO NOT EMPTY 

; WRITE TO STATUS REGISTER, FIFO NOT EMPTY 

.'FIFO NOT EMPTY INTERRUPT PORT 2-5 HIGH 

;ROW SCAN SELECT TO ACCUMULATOR 

■SAVE INTERRUPT, NO CHANGE TO SCAN VALUE 

'ROW SCAN SELECT REGISTER 

; FIFO TOP ADDRESS TO ACCUMULATOR 

.' COMPARE WITH CURRENT FIFO INPUT ADDRESS 

i IF THE SAME RESET FIFO INPUT REGISTER 

,NEXT FIFO INPUT ADDRESS 

■> CHECK FIFO FULL 

■RESET FIFO INPUT REGISTER, BOTTOM OF FIFO 

•FIFO INPUT ADDRESS TO ACCUMULATOR 

; COMPARE INPUT WITH OUTPUT FIFO ADDRESS 

; IF NOT SAME CHECK COLUMN COUNTER VALUE 

i IF OBF IS 1 THEN CHECK OBF 

.■FIFO TOP ADDRESS TO ACCUMULATOR 

.'COMPARE TOP TO OUTPUT FIFO ADDRESS 

-' IF THE SAME RESET FIFO OUTPUT REGISTER 

'NEXT FIFO OUTPUT ADDRESS 

.' LOAD DBBOUT 

■RESET FIFO OUTPUT ADDRESS TO BOTTOM OF FIFO 

-OUTPUT FIFO ADDRESS TO ACCUMULATOR 

i FIFO POINTER USED FOR OUTPUT 

»• CHANGE WORD TO ACCUMULATOR 

^CHANGE WORD TO DBBOUT 

; COLUMN COUNTER TO ACCUMULATOR 

i IF NOT 8 FINISH CHANGE WORD ENCODING 

•FIFO BOTTOM ADDRESS TO ACCUMULATOR 

■COMPARE FIFO INPUT ADDRESS WITH FIFO BOTTOM ADDRESS 

, IF THE SANE, ADJUST TO CHECK FOR FIFO EMPTY 

iFIFO INPUT ADDRESS TO ACCUMULATOR 

DECREMENT FIFO INPUT ADDRESS IN ACCUMULATOR 

-COMPARE INPUT TO OUTPUT FIFO ADDRESSES 

4-695 
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X107 



PAGE 



LOC OBJ 
8688 C691 

eesfl 849C 

888C 232F 
888E DO 
808F 969C 
8991 2398 

8093 98 

8094 9flDF 
8896 Ffl 
0897 53DF 
8899 AA 
009A041D 
809C 861D 
009E 846F 



SEQ 

254 
255 



SOURCE STATEMENT 



JZ 
JMP 

256 ADJFEM: MOV 

257 XRL 

258 JNZ 

259 STATMT: MOV 

260 MOV 

261 INTRLO: ANL 

262 MOV 

263 ANL 

264 MOV 

265 JMP 

266 CH0BF2: JOBF 

267 JMP 

268 ; 

269 END 



STATMT 

CH0BF2 

A, IFIFOTA 

A,R5 

CH0BF2 

R,#80H 

STS,A 

P2,#0DFH 

ftR2 

A,#8DFH 

R2,A 

ADJREG 

ADJREG 

ADJFOT 



IF SAME- WRITE STATUS REGISTER FOR FIFO tMPTV 

CHECK OBF 

FIFO TOP ADDRESS TO ACCUMULATOR 

COMPARE TOP TO OUTPUT FIFO ADDRESS 

IF NOT SAME THEN FIFO IS NOT EMPTV, CHECK OBF 

CLEAR BIT 8 FOR FIFO EMPTV 

WRITE TO STATUS REGISTER 

FIFO EMPTV, INTERRUPT PORT 2-5 LOW 

SCAN ROW SELECT TO ACCUMULATOR 

SAVE INTERRUPT. NO CHANGE TO SCAN VALUE 

SCAN ROW SELECT REGISTER 

ADJUST REGISTERS 

IF OBF=l THEN ADJUST REGISTERS 

ADJUST FIFO OUT ADDRESS TO LOAD DBBOUT 



USER SVMBOLS 
ADJFEM 888C 
CHOBF2 889C 
INTRLO 8894 
SCANMX 882C 



ADJFIN 885F 
DELAY2 8838 
LOADDB 8879 
SCANTM 888F 



ADJFOT 886F 
ENCODE 8845 
LOADFF 8852 
STATMT 8891 



ADJREG 881D 
FIFOBA 8888 
OBFINT 0818 
STRTNE 8056 



CHCNTR807D 
FIFOTA 882F 
RRLOOK 803A 



CHFFEM 
F1LLMX 
RSETRG 



CHFFUL 8869 CHOBF1 006D 
INITMX 0808 INTRH1 8859 
RSFFIN 8067 RSFFOT 007? 



ASSEMBLV COMPLETE, NO ERRORS 



12/78 



4-696 



Ref.#AB140 



insite INTEL * USER S libr ary submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 B 8048 D 8080/8085 D 8086 B Other UPI-4" 



. Iuh additional ihHli If ixKastary) 



AP-27 LRC Printer Controller 



This program uses the UPI-41 or UPI-41A as a dot matrix printer 
controller for the 40-column LRC 7040 dot matrix printer. The UPI 
buffers up to 40 ASCII characters, formats and prints the buffer 
whenever 40 characters or a CRLF is received whichever occurs first. 



All information pertaining to required hardware, software, input 
parameters, and output results are documented in the Intel 
Application Note AP-27 ("Printer Control with the UPI-41"). 



Registers Modified: 



See Listing 



RAM Required: 



8 bytes 



ROM Required: 



766 bytes 



Maximum Subroutine Nesting Level: -- 



Assembler/Compiler Used: ASM48 M0D41 



Programmer: 



J. Beaston 



Company: 



Intel 



Address: 



City: 



State: 



© Intel Corporation, 1978 

12/78 



98034 E 

4-698 



■ , "JL T.M 

insite 



Ref .#AB141 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



Q 8008 



8048 D 8080/8085 D 8086 



Other I IP I -41 A 



— (us* additional sheets If necessary) 



Combination I/O Device (UNI0D) 

This program uses the UP I -41 A as a combination serial and parallel 
I/O device. The serial part is full-duplex asynchronous with program- 
mable baud rates of 1200, 600, 300, or 110 baud. The transmitter and 
receiver are double buffered. The receiver checks for framing and 
overrun errors. 

The 8-bit parallel part is programmable for input or output. 

All information pertaining to required hardware, software input and 
output parameters is fully documented in the Intel Application Note 
AP-41 ("Introduction to the UPI-41A") and the listing for this 
program. 



Registers Modified: 



See listing 



RAM Required: 



12 bytes 



ROM Required: 



363 bytes 



Maximum Subroutine Nesting Level: 



1 



Assembler/Compiler Used: ASM48 M0D42 



Programmer: j_ Beas+on 



Company: 



Intel 



Address: 



City: 



State: 



© Intel Corporation, 1978 

12/78 



98-034E 

4-700 



Ref .#AB142 



insitg INTEL * USER 'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 D 8080/8085 & 8086 □ Other. 



. (u*» addition*! shMti If rwcetury) 



SDK-86 Serial Monitor, VI .1 



Interactive monitor with commands for examining/modifying registers 
and memory, controlling program execution using breakpoints or 
single step, moving memory blocks, inputting from or outputting to 
I/O ports, and reading and writing HEX/Object files on paper tape. 



SDK-86 

ASR-33 teletype or CRT 



See SDK-86 MCS-86 System Design Kit User's Guide, Order #98000698 



See above mentioned User's Guide 



Available on non-system 
diskette only for $35.00 
(source & object code included) 



Registers Modified: 



N/A 



RAM Required: 



256 bytes 



ROM Required: 



4K bytes 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: PL / M "86 Comp i I er 
VI .0 



Programmer: Jane+ Takamj 



Company: 



Intel 



Address: 



City: 



State: 



© Intel Corporation, 1978 

12/78 



98034E 



4-702 



insite 



Ref .#AB143 



INTEL* USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 D 8048 D 8080/8085 & 8086 D Other . 



(us* additional ahaala II iwcesury) 



SDK-86 Keypad Monitor, V.1.1 

Interactive monitor with commands for examining/modifying registers 
and memory, controlling program execution using breakpoints or single 
step, moving memory blocks, and inputting from or outputting to I/O ports 



SDK-86 



See SDK-86 MCS-86 System Design Kit User's Guide, Order #98000698 



See above User's Guide 



Available on non-system 
diskette only for $35.00 
(source & object code included) 



Registers Modified: ., . 

N/A 


Programmer: 


Janet Takami 


RAM Required: 

256 bytes 


Company: 


Intel 


ROM Required: 

4K bytes 


Address: 


Maximum Subroutine Nesting Level: 


City: 


PL/M-86 
Assembler/Compiler Used: Compi | er V .1. 


State: 



£ Intel Corporation. 1978 

12/78 



98-034 E 



4-704 



insite 



Ref .#AB144 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 □ 8048 B 8080/8085 D 8086 (2 Other SDK-80 



(u»» additional ahaata II nacaaaary) 



TAPE - Audio Tape Interface 

This routine outputs RAM data to an audio cassette recorder which is 
paralleled to a CRT terminal. The data can be read back by means of 
the monitor I -command so that one needs not enter any bootstrap loader, 



Intel SDK-80 Kit or other 8080 computer; CRT terminal (or TTY); 
cassette interface (see diagram included with source listing) 



SDK-80 monitor PROM 



Data area start, end; start program: .G1300 (CR) 

Enter start/end-addresses: XXXX,YYYY (CR) 

After the CR turm on cassette recorder immediately. 

Leader and trailer of approx. 5 sec are produced by the program itself, 

After data recording (visible on the terminal) the cassette recorder 

should be stopped while the trailer runs to avoid the sign on message 

being recorded. 



Data on cassette in ' l-format' 



Registers Modified: ^/A 


Programmer: 


Guenter Ruschitzka 


RAM Required: 70 bytes 


Company: 


ROM Required: SDK-80 monitor 


PROM 


Address: 


Im Bruehl 1 


Maximum Subroutine Nesting Level: N/A 


City: 


D-6921 Zuzenhausen 


Assembler/Compiler Used: 8080 


State: 


Western Germany 



© Intel Corporation. 1978 
12/78 



98-034E 

4-706 



AB 145 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 B 8080/8085 D 8086 D Other. 



(use additional sheets If necessary) 



TEXT PROCESSOR 



Processes the textual material into intended format by using the 
format command language. The command languages are interspersed 
within the source text. The user can specify margins, case headings 
and foolings, paragraphs, center text, right justify, page footnote, 
underline, create tables and more. 

Intel MDS, Disk drive, Video terminal, Printer 



ISIS-II file system 



TEXT <input file> [<output file>] 

where 

<input file> is the source textual material 

<output file> is the output file mane 

:LP: is for line printer 

:C0: is for CRT, and :T0: is for teletype 

If not specified, the default file name is used (see the user's 

Manual) 



The output is generated as specified. 

The error message is displayed onto the CRT 



Program available on 
diskette only for $70.00 



Registers Modified: N 


Programmer: Triyono 


RAM Required: 


Company: Naval Postgraduate School 


ROM Required: p„ 


Address: Code 52Bg 


Maximum Subroutine Nesting Level: j 


Clty: Monterey 


Assembler/Compiler Used: pT / m _qq 


State: CA 93940 



© Intel Corporation, 1978 
12/78 



98-034 E 
4-708 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



AB 147 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 D 8048 □ 8080/8085 □ 8086 C? Other UPI-41A 



(um additional ahaata If nacaaaary) 



8278 Keyboard/Display Controller 

This program is the source code for the UPI-41A based 8278 
Keyboard/Display Controller. Features of the 8278 are; 

--128 key scanning logic. 

— 16 digit LED display multiplexing. 

--Interface for either contact or capacitiyely coupled 

keyboards . 
—N-key rollover. 
— 8-character Keyboard FIFO. 
—Right or left entry display. 

All information related to required hardware, software, input 
parameters, and output results is documented in the 8278 Data 
sheet and program listing. 



Registers Modified: 

See Listinq 


Programmer: 

J, Beaston 


RAM Required: 

64 ovtes 


Company: 

Intel 


R0M g^Mes 


Address: 


Maximum Subroutine Nesting Level: 5 ee ^ -j st"f na 


City: 


Assembler/Compiler Used: ASM48 M0D42 


State: 



© Intel Corporation, 1978 

2-79 



4-711 



insite 



INTEL* USERS LIBRARY SUBMITTAL FORM 



AB 148 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 □ 8048 D 8080/8085 D 8086 Mother UPI-41A 



. |um additional thaats If nacaaaary) 



8295 - Dot Matrix Printer Controller 

This program is the source for the UPP-41A based 8295 Dot Matrix 
Printer Controller. It is intended to interface LRC 7040 series 
printers. The 8295 features are: 

--On-chip 40 character buffer. 

--Parallel or serial communication to master processor. 

—Programmable DMA interface. 

--10/12 chr/in print density. 

--Single or double width printing. 

—Programmable print intensity. 

--Programmable line feeds. 

—3 programmable tabulations. 

--2 general -purpose output pins. 

All information related to required hardware, software, input 
parameters, and output results is documented in the 8295 Data 
Sheet and program listing. 



Registers Modified: See Listing 



RAM Required: 



48 bytes 



ROM Required: 



1021 bytes 



Maximum Subroutine Nesting Level: See Listi 



ng 



Assembler/Compiler Used: ASM48 M0D42 



Programmer: J. Beaston 



Company: 



Intel 



Address: 



City: 



State: 



© Intel Corporation, 1978 

2-79 



4-713 



insite 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



AB 149 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 D 8048 □ 8080/8085 □ 8086 d Other UPI-41 



. (uaa additional ahaata If nacaaaary) 



OLIVETTI 20-Column Printer Controller 



This program is for a UPI-41 controlling an Olivetti 20-column 
printer. The UPI interface to the master processor may be 
parallel via the standard peripheral interface or serial (2400 
baud). The UPI accepts and buffers up to 20 ASCII characters 
before printing. Complete control and timing of the printer 
motor and solenoids is provided by the UPI. 



All information pertaining to required hardware, software, input 
parameters, and output results are included in the attached 
document and program listing. 



Registers Modified: See Listing 


Programmer: 


J. Beaston 


ram Required: See Listing 


Company: 


Intel 


ROM Required: 335 Bytes 


Address: 


Maximum Subroutine Nesting Level: See Listing 


City: 


Assembler/Compiler Used: ASM48 M0D41 


State: 



© Intel Corporation, 1978 

2-79 



4-715 



■ ■■ T.M 

insite 



AB 150 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 □ 8048 □ 8080/8085 □ 8086 LK Other __8741A_ 



. (use additional shaat* If necessary) 



8292 (GPIB Controller) implementation on 8741A. 



This software implements the IEEE 488 controller function 
(8292) on the 874 1A. 



Refer to 8292 Data Sheet for required hardware. 



Refer to listing and 8292 Data Sheet for required software, 
input parameters, output results, and other software details. 



Registers Modified: 


Programmer: T. Vol! 


RAM Required: N/A 


Company: Intel 


ROM Required: 1000 1f , 


Address: 


Maximum Subroutine Nesting Level: 


City: 


Assembler/Compiler Used: MCS-48/UPI-41 


State: 



© Intel Corporation, 1978 

2-79 



4-717 



insite 



AB 151 



INTEL USERS LIBRARY SUBMITTAL FORM 



O 8000 fifi 8048 ftl 8080/8085 D 8086 D Other. 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



— (us* additional (harts II necessary) 



SEND48 - Download to PROMPT 48 for Series II 



Allows user to download a HEX file from a Series II Development 
System (with disk) to the PROMPT 48. 



(1) Series II Development System with Serial Channel 2 available 
and unmodified. 

(2) Prompt 48 strapped for RS232C, 2400 baud. 

(3) Interconnecting cables. 

(See program listing for details.) 
ISIS-II in Development System. 
Monitor firmware in Prompt 48. 

See program listing for operating instructions. 



None, except for standard ISIS error messages, if appropriate. 



RAM. Required: 1206H bytes including a 4K 
buffer wnose size may be altered. 



Registers Modified: 



All 



ROM Required: 



Maximum Subroutine Nesting Level: (Stack= 2AH) 



Assembler/Compiler Used: PLM80 Ver. 3.1 



Programmer: 



Company: 



P. Bushel! 
MicroGenics 



Address: 



22, Willows Road, 



Bourne End, Bucks, 



SL8 5HG. ENGLAND. 



© Intel Corporation, 1978 

2-79 



4-719 



insi 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



i^\ 



INTEL* USERS LIBRARY SUBMITTAL FORM 



AB 152 



□ 8008 □ 8048 ¥? 8080/8085 D 8086 □ Oth»r. 



(um additional shwH* if nacaaaary) 



OUTIN - PROMPT 48 or PROMPT 80 INTERFACE 



"OUTIN" sends (OUTBYT) and receives (INBYT) one byte to 
PR0MPT48 or PR0MPT80 via PROMPT-SPP-Cable (see source-listing) 



oS^II e ^n D c' PR0MF ™ or PR0MPT80, PROMPT-SPP-Cable (see attached 
PROMPT-SPP-Schematic) 



ISIS II (for testing: see attached PROTES) 



OUTBYT Register C = transmit- value 
INBYT none 



OUTBYT non (but transmit-value is transmitted to PROMPT) 
INBYT Resgister A = received value form PROMPT (or 0, if 
no startbit was detected during time-out-loop) 



for more details see OUTIN-source-listi 



ng 



Registers Modified: 



A, B. C. D. E 



RAM Required: 



none 



ROM Required: 



98 bvte 



Maximum Subroutine Nesting Level: 1 



IS IS- 1 1. 8080/8085 Macro Ass. V2.0 

Assembler/Compiler Used: 



Programmer: 



Glasmacher 



Company 



Peter Glasmacher 



Address: 



Boxberaer Str. ll.n-annn 



City: Munchen 45, 



State: West Germany 
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4-721 



insite 



AB 153 



INTEL* USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 □ 8048 KJ 8080/8085 D 8086 D Other. 



(um additional ahaata If treasury) 



REM0TE48 - INTERACTIVE CONTROLLER OF PR0MPT48 



Remote, interactive control of PR0MPT48 through MDS and CRT 
(for detailed description see additional sheet] 



MDS with 32K-RAM, CRT or TTY, PR0MPT48, PROMPT-SPP 



for use: ISIS-II 

for generation: PLM80 V2.0 or V3.0 (for REMOTE. SRC) 
ASM80 V2.0 (for OUTIN.SRC) 

type commands on consol 



Depends on typed commands: 

PR0MPT48-action (fe.e. signle step, go with break, etc.) 
Dump of PR0MPT48-data (f.e. registers, program-memory, etc.) 
to consol and - if required- to an ISIS-file 

The PR0MPT48-data on consol are cleaned and tabulated, 
an address-header is inserted after e^/ery 8 lines, to 
get good readability. 

The PR0MPT48-data, that is sent to an ISIS-file, is in 
Intel-Hex-Format. 



Registers Modified: .~. 


Programmer: 

Peter Glasmacher 


RAM Required: 32K . MDS . RAM 


ompany. j n g enl - e> Glasmacher 


ROM Required: Nothing 


Address: Boxberger Strabe II 


Maximum Subroutine Nesting Level: LeSS 10 


City: D-8000 Munchen 45 


PLM80 V3.0 and ASM80 V2.0 

Assembler/Compiler Used: 


State: West- Germany 
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4-723 



£BJ53 



APPENDIX to REM0TE48 



REM0TE48 accepts the following commands, which correspond to 
one or more keys of the PROMPT48. 

f.e. the single-letter-command n S w performs the following 
PROMPT48-key strokes or PR0MPT48-commands 

(GO) (SINGLE STEP) (.) (D) (REGISTER) (0) (,) (4) (8) (.) 
and prints or displays it to the consol in this form 

ADDR +0+1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F 
0000 04 67 94 D4 FF 00 00 00 01 30 PE 98 55 A3 6D 3E 
0010 00 PP and so on 



REM0TE48-Command s = PROMPT48-Keystrokes or function 



EXIT 

PROG 

DAT 

REG 

DUP 

DUD 

DUR 

C/P 

EX 

GB 

GN 

GS 

TOl-t *isis-f ile^> 



R 
S 





1 

etc. 

9 

A 

etc. 

E 

F 



exits or returns from REM0TE48 to ISIS 
(PROGRAM MEMORY) 
(DATA MEMORY) 
(REGISTER) 

(D) (PROGRAMM MEMORY) 
(D) (DATA MEMORY) 
(D) (REGISTER) 
(CLEAR ENTRY/PREVIOUS) 
(EXAMINE) 
'GO) (BREAK) 
GO) (NO BREAK) 
.GO) (SINGLE STEP) 
write the content of the input-buffer, 

f.e. dumped program-memory, to the 

specified ISIS-file 
(D) (REGISTERS) (0) (,) (4) (8) (.) 
(GO) (SINGLE STEP) (.) (D) (REGISTERS) (0) 

(.) (4) (8) (.) 
or (NEXT) 

(EXECUTE/END) 



hexadecimal numbers 




It is allowed to insert spaces between commands or hexadecimal 
numbers, but not within commands. It is possible to correct 
a line with ISIS-line-editing-commands like "rub out" etc. 
The PR0MPT48-monitor-echo-signs like "?" or "-" are displayed 
on the consol. REM0TE48 asks for new command or commands with 
TYPE COMMAND: 



4-724 



Error-reporting ; 

*#*** N0 CONNECTION BETWEEN MDS AND PROMPT (PRESS (MON INT) OR 
(SYS RST)!) 

This message is printed to the consol, if MDS and PROMPT 
don't communicate, f.e. PR0MPT48 is switched off, the 
PR0MPT48-key-monitor is active or the PROMPT 48 is running 
after "Go no break" or "Go with break". 



A*****HERE OCCURED ERROR OR CONSOL i BREAK 

The first sign of this message ("*") points to the first sign 
of the unrecognized command, that is reprinted first. 



Examgle^ 
TYPE COMMAND :_ 
TYPE COMMAND: 
TYPE COMMAND: 



NONSENSE 



NONSENSE 

a*****HERE OCCURED ERROR OR CONSOL-BREAK 



The underlined signs were typed in by the user. 

The same message appears, if the PROMPT48 was rnnning^wfeen one 
hit any consol-key. 



Using REM0TE48 under ISIS (a short example of a REM0TE48-session) 
-REMOTE (that is the call to REM0TE48 from ISIS-level) 



PR0MPT48-REM0TE VERSION 1.0 

TYPE COMMAND: GS 0. (that is one single step beinning at address 0) 

that is the echo of PR0MPT48) 

that means: return to ISIS) 

that is the ISIS-prompt) 



TYPE COMMAND: EXIT 



4-724A 



AB 154 



inSito INTEL * USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 $ 8080/8085 D 8086 D Other. 



. (uh additional shaat* II nacaasary) 



SYMBOL TABLE INSER1ER FOR AB22 

Inserts labels into a disassembled object tape. 



MDS System 



Program AB22 



This program accepts: 

(1) a symbol table from the console operator 

(2) a disassembled object tape of the format produced by proqram 
AB22. 



Source tape with labels inserted, ready for reassembly. 



Registers Modified: Al 1 


Programmer: 


B.A. Robinson 


RAM Required: 2837 


Company: 


Du Pont of Canada Limitei 


ROM Required: 


Address: 


P.O. Box 5000 


Maximum Subroutine Nesl 


ing Level: 


3 




City: 


Kingston 


Assembler/Compiler Used: 


8080 Macro Ass em. 


V2, 


QState: 


Ontario, Canada, K7L 5A > 
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4-725 



insite INTEL ' USERS l ibrary submittal form 



AB 155 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 □ 8048 £28080/8085 □ 8086 D Other 



. (us* additional ahaala If nacaaaary) 



PSEUDO DISASSEMBLER FOR SDK-80 

The program lists a machine program one instruction a line, 
An instruction consists of one, two or three bytes. Each 
line is preceded by the instruction address. 



SDK-80Kit for other 8080 computer 



SDK-80 Monitor PROM 



Start the program with G1300 (CR) , then type in the 
begin address followed by (CR) . 

ESC terminates the listing, any other character triggers 
another line. 



Pseudo-disassembled machine code on console 



Registers Modified: 



RAM Required: 8AH Bytes 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 8080 



Programmer: 



Guenter Ruschitzka 



Company: 



Address: 



Im Bruehl 1 



City: 



6921 Zuzenhausen 



State: 



Western Germany 



© Intel Corporation. 1978 

2/29 



4-727 



insite 



AB 156 



INTEL USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 M 8080/8085 D 8086 D Other. 



(um additional ahmHa If nacaaaary) 



SCAN - SCANNER AND SELECTIVE FILE LINE PRINTER 



Program allows rapid scanning of a disk text file using the console 
CRT. Any segment may also be directed to the Line Printer. Historical 
printing is used to insure all of a selected segment is printed. 



MDS, Floppy Disk Drive, Line Printer, CRT, 32K RAM 



ISIS-II, MDS Monitor 



Program implemented by entering: 
SCAN FILENAME 



The selected file is output to the CRT. 
Controls may be entered at any time. 



CTRL/S 
CTRL/Q 
SPACE 



CTRL/C 



-Freeze Output 

-Unfreeze Output 

-Starts or stops printer. When started printer 
will print historically up to 22 lines. If more 
than this number have been output without printing, 
then a line of asterisks is printed to indicate the 
skipped data. 

-Abort and Return to ISIS 



Registers Modified: ^11 


Programmer: r. R yan 


RAM Required: 32K 


Company: T0TC0 


ROM Required: 


... P. 0. Box 1307 
Address: 

W. Rock Creek Road 


Maximum Subroutine Nesting Level: 


City: Norman 


L1 ,„ ISIS-II 8080/8085 
Assembler/Compiler Used: ^s^ v? n 


State: Oklahoma 
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4-729 



insite 



AB 157 

INTEL* USER'S LIBRARY SUBMITTAL FORM 



D 8008 D 8048 ^ 8080/8085 D 8086 D Other. 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



(um additional ahaata If nacaaaary) 



SDK85 — Monitor for the 8085 System Design Kit 



Monitor for the Intel 8085 System Design Kit (SDK-85). 
Provides a minimum level of utility functions for the user as well 
as such functions as memory and register manipulation, program 
loading and execution, and single step capability. 



SDK-85 (also supports TTY) 



None 



Monitor includes rudimentary command line interpreter for operator 
interface. See SDK-85 System Design Kit User's Manual (Manual # 
980045 1A) for details. 



Avai iable on non-system 
diskette only for $35.00 
(source & object code 
included) 



Registers Modified: 



All 



RAM Required: 



38 bytes + stack 



ROM Required: 



2K bytes 



Maximum Subroutine Nesting Level: 



808078085 

Assembler/Compiler Used: Macro Assembler 



P/ogr^mmeL- mis monitor is provided| 
in ROM form to customers purchasi 



Company: the ^K-8b Kit. 



ng 



Address: 



City: 



State: 
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4-731 



insite 



AE 18 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 

Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8046 S 8080/8085 □ 8086 D Other. 



(use additional ahaata If nacaaaary) 



DKDUMP - ISIS DISK FILE DUMP 

DUMPS ISIS disk files in HEX and ASCII to an output file 
(typically :C0: or :LP:) 



MDS DISK SYSTEM 



ISIS-II 



FROM KEYBOARD: 

DKDUMP : :Fn:filemane to :00: 

Where: (:Fn: is the drive number); (filename is the fully 

qualified file name); and (:00: is the output 

devise) . 

i.e. DKDUMP DKDUMP TO :LP: 



A hexadecimal interpretation of the file with a separate 
column for the ASCII equivalent code. 16 Bytes are dis- 
played on each line, with a hexadecimal relative - to byte 
of the file address displayed in the left margin. 



Registers Modified: 


Programmer: gtu Mler 


RAM Required: 


Company: Litton Energy Control 


ROM Required: 


Address: g 944 MasQn Ave 


Maximum Subroutine Nesting Level: 


City: Chatsworth 


Assembler/Compiler Used: dt /m-80 


State: CA q 1311 



© Intel Corporation, 1978 
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4-733 



insite 



AE 19 



INTEL* USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 fl 8080/8085 D 8086 D Other. 



(um additional ahaata If nacaaaary) 



DDUMP - DISKETTE DUMP 



Dumps diskette on a block basis to :C0: or :LP: in hexadecimal 
and ASCII format 



MDS, MDS-DOS, console device 



MDS Monitor, ISIS- II 



DDUMP Program prompts for output device, beginning track and 
sector, ending track and sector 



t S - suspends display 

+ Q - continues display 

t R - restarts DDUMP 

t E - reboots ISIS 



Outputs to selected device contents of specified block (or blocks) 
in hexadecimal and ASCII format 



Registers Modified: a -i -i 



RAM Required: 



32K 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used:I SIS- 1 1 Macro-Assembl JrState 



Programmer: CaH Harcourt 



Company: Nayal Avionics Center 



Address: 



6000 E. 21st Street 



City: 



Indianapolis 



Indiana 46218 



© Intel Corporation, 1978 
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4-735 



AB158 



insite INTEL * USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 D8048 g 8080/8065 □ 8086 □ Other. 



(uaa additional shaatt if nacassary) 



RATE - BAUD RATE SELECTION FOR MDS 220 AND 230 SYSTEMS 

Initializes serial ports 1 and 2 for Intel 220 and 230 
Development Systems 



Intel 220 or 230 Development System 



ISIS-II System Programs 



Main console 



Serial port's baud rate, stop bits, parity, word length are 
selected by operator for both ports 



Registers Modified: 



8080-all 



RAM Required: 



2K bytes 



ROM Required: 



2K bytes 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: ASM80, V2.0 



Programmer: 



Tom Wrenn 



ompany. Dayton Scientific Inc 



Address: 



121 West Park 



City: 



Dayton 



State: 



Ohio 45459 



© Intel Corporation, 1976 
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4-737 



AB159 



insite INTEL * USERS L|BRAR ^ submittal form 



□ 8008 D 8048 SI 8080/8085 □ 8086 □ Other. 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Result! 



(um additional thMti If naceasary) 



SEARCH - KEYWORD FILE SEARCH FOR ISIS-II ENVIRONMENT 

Searches specified source file for lines containing specified 
keywords. Source lines containing all the keywords (maximum of 10) 
are printed to the specified list file. 



MDS800 (with at least 32K RAM) 
system console 
floppy disk drive 



ISIS-II System Files - program contains linkages to ISIS-II 
system library routines for file input/output 



Command syntax is (assuming file :F0: SEARCH is the compiled and 
located object module): 

SEARCH FILENAME <PRINT LISTFILE) KEY KEYWORDl /kEYW0RD2 
KEYW0RD3. . .) 

WHERE: -FILENAME IS THE FILE TO BE SEARCHED 

-LISTFILE IS FILE TO WHICH LINES CONTAINING 
SPECIFIED KEYWORDS ARE TO BE PRINTED 
(DEFAULTS TO :C0:) 
-KEYWORD (N) ARE KEYWORDS FOR WHICH THE PROGRAM 

SEARCHES 
-A MAXIMUM OF TEN KEYWORDS (DELIMITED BY BLANKS) 
-TABS IN FILENAME ARE CONVERTED TO SPACES IN LISTFILE 

Error Messages (in addition to ISIS-II error messages) : 
Error # 

101 Reserved word "KEY" not found in command buffer 

102 No keywords found in command buffer 

103 (CRLF) (LINE SEPARATOR) was not found in source file 

104 (CR) not found in command buffer 



Registers Modified: 



ALL 



RAM Required: 



Program length about 2K 



ROM Required: 



None 



Maximum Subroutine Nesting Level: 10 



Assembler/Compiler Used: PLM80 



Programmer: 



Richard D. Heslip 



Company: _,,-_. 

Gandalt Data Communications 



Address: 



9 Slack Road 



City: Ottawa 



State: Ontario CANADA 
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4-739 



AB160 



insite INTEL * USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



8008 □ 8048 D 8080/8085 □ 8086 □ Other. 



(uaa additional ahaata II necessary) 



TIMER - MEASURES EXECUTION TIMES OF USER PROGRAMS 

Determines the time taken by any user program to execute 
RANGE: 1 Milli second to 4% hours 



MDS 800 with Real Time Clock on front panel control module 



ISIS-II operating system V2.2 
MDS Monitor V2.0 



Starting address of the user program to be timed. The program 
must exit with a 'RETURN' statement as timer treats it as a 
subroutine 



Time in milliseconds displayed on the system console 



Registers Modified: 



ALL 



RAM Required: 



16 bytes 



ROM Required: 181 bytes 



Maximum Subroutine Nesting Level: User P ro S ram 



+2_ 



Assembler/Compiler Used: ASM80, V2.0 



Programmer: 



M. Master 



Compan 



jmpany: Univ of Ottawa 
Electrical Engrg. Dept 



Address: 770 King Edward Ave 



City: 



Ottawa, Ontario 



State: 



CANADA KIN 6N5 
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4-741 



Ref. # AB161 



insi W INTEL * USERS library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D8008 D 8048 508080/8085 □ 8086 □ Other 



. (us* additional ahaata If nacaaaary) 



KAPIAR, VI. 2 - A GENERAL PURPOSE MACRO ROCESSOR 

Processes user-defined MACROS. Builtin MACROS are: 

DEFINED, DELETE, SAVE, IFELSE, SUBSTR, APPEND, LENGTH, TYPE 
INDEX, INCR, DECR, REG, LOAD, ADD, SUB, TOKEN, LINE, and BUFFER. 
Includes KAPIAR. SKL, a stripped-down version for skeleton of 
dedicated Macroprocessors-extensive debugging facilities. 

40 Kb or RAM, Diskette files, keyboard, video monitor 



ISIS-II 



DOES NOT APPLY 



DOES NOT APPLY 



AVAILABLE ON DISKETTE ONLY 1 



Registers Modified: 



ALL 



RAM Required: 



40Kb 



ROM Required: 



None 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



PL/M80. V3.0 



Programmer: 



Company: 



Steve Newberry 

Stanford University 



Address: 



City: 



Stanford 



State: 



California 94305 



6/79 



4-743 



Ref . # AB162 



insito INTEL * users libra ry submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 3 8080/8085 D 8086 □ Other. 



<u«* additional ahaata If nacaaaary) 



ECCO PAPER TAPE READER 

Loads an Intel Hexadecimal Object File Formated Paper Tape using an 
ECCO paper tape reader. 



ECCO Paper Tape Reader Model 2001-2 or equivalent 
SBC 80/10 with SBC 116 or SBC 80/20 



SBC 80 P Monitor or 
SBC 80P20 Monitor 



Memory area as specified on Intel Hexadecimal Object File Formated 



Paper Tape 



Registers Modified: 



ALL 



RAM Required: 



ROM Required: QEEH 



Maximum Subroutine Nesting Level: 



MAC80 Cross 
Assembler/Compiler Used: Assemb ler V2 . 4 



Programmer: 

H. R. Pinnich, Jr. 



Company: 

Southeast Missouri State Univ. 



Department of Chemistry 



Cape Girardeau 



State: M0 63701 



6/79 



4-745 



Ref . # AB163 



Insite INTEL * user ' s library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 □ 8048 *3 8080/8085 □ 8086 □ Other. 



(um additional ihwli If nacassary) 



TRACE. ICE 

Symbolic disassembly and register dump in ICE80 • 



Intellec MDS, ICE80 



ISIS-II, ICE80 



Trace is called as an MDSCALL after GO or STEP emulation. The user 
types the number of emulations and TRACE halts and waits for command 
when they have been completed. Exit to ice command is provided by 



esc. 



Trace displays the current timer, all flags as symbols (e.g. +ZC) all 
registers in hex, P. C. in hex and symbolic, mnemonic, operand in hex 
and symbolic. All display is on one line. Symbols are taken from the 
ice symbol tables and EL/M line no. tables. In addition in GO 
mode Trace displays the 44 cycle history, by symbolic disassembly. 



Registers Modified: 



N/A 



RAM Required: acc.ii 



ROM Required: None 



Maximum Subroutine Nesting Level: m /a 



Assembler/Compiler Used: ISIS ASM80 V2.0 



Programmer: 



C.J. Lusby Taylor 



Company: Intel International 



Address: Rue du Mou i in a p ap i er 5i 



City: b-1160 Brussels 



State: Belgium 



6/79 



4-747 



Ref . # AB164 



insiW INTEL * users library submittal form 



D 8008 □ 8048 tX 8080/8085 D 8086 □ Other 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Output 
Results 



— |un additional ahaata if naeaaaary) 



DOWN 80 



To down load an Intel hexadecimal formatted program from a Series II 
to PROMPT-80/85 



PR0MPT-SER (RS232C Cable) 

User build (MDS Series II, PROMPT 80) male-to-male connector 



ISIS-II V3.4 



Input Program must be linked and located to ISIS-II system files, 
Parameters 



Program loaded into PROMPT RAM 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: PL/M80, V3.1 



Programmer: 



Conrad Weiderhold 



Company: 



Intel Corporation 



Address: 



900 Jorie Blvd. 
Suite ??0 



City: 



Oakbrook 



State: 



Illinois 



60521 



6/79 



4-749 



insite 



Ref. AB165 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Software 



Input 
Parameters 



Output 
Results 



O 8008 ft 8048 D 8080/8085 D 8086 D Other. 



(use additional ihMli If necessary) 



IBM BI-SYNC CRC16 GENERATION SUBROUTINE 

Generates IBM CRC 16 Check Bytes using polynomial X 16 + X 15 + X 2 + 1 



Required 

Hardware 8048 CPU 



User Drive Program 



Transmission data byte in accumulator 



Reg Bank 1 R5 & R6 Contain CRC 

N.B. STX Character (02H) Resets CRC 

PAD Character (FFH) Ignored (IBM Convention) 



Registers Modified: 
RBI - R4, - 7 



RAM Required: 



User Defined 



ROM Required: 37H Bytes 



Maximum Subroutine Nesting Level: ,, en ""y 
call 



^^e^^^SSI^Jf"" 



Programmer: 



Andy Bel ton 



Company: Tech . Nel Data p roducts LTD 



Address: 



PO Box 1 

75 High Street 



City: 



Bracklev Northants 



State: 



NN13 5NN England 
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4-751 



insite 



-, . .-._ Ref - # AB16 6 

INTEL* USERS LIBRARY SUBMITTAL FORM~ 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 *0 8080/8085 D 8086 D Other. 



(use additional shMts if necessary) 



HXEDIT - HEXADECIMAL DISK FILE EDITOR 
To modify hexadecimal disk files. 



MDS 



ISIS-II 



HXEDIT file 

Program must be linked and located to ISIS-II system files. 



Arbitrary changes may be made to any located object disk file (not 
write-protected) . Patches in machine language may be made to located 
objects, thereby avoiding the necessity for re-assembling and re- 
locating. 



Registers Modified: 



RAM Required: 



1070 Bvtes 



ROM Required: 



Maximum Subroutine Nesting Level: 4 



Assembler/Compiler Used: ASM80 



Programmer: 



Ben A. Harris 



Company: 



Techtran Industries 



Address: 



200 Commerce Drive 



City: 



Rochester 



State: 



New York 14623 



6/79 



4-753 



insite 



Ref. # AB167 



INTEL* USER'S LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 □ 8048 1X8080/8085 □ 8086 □ Other. 



. (use additional ahaate It nacaaaary) 



ALPHANUMERIC INPUT FROM NUMERIC KEYBOARD 

Enter a set of 44 alphanumeric characters from a 16-key 
keyboard into a 8080 system. 



8080 System, 16 key keyboard, 
16-character display, console 



None 



EXAMPLE: keyboard input sequence 

" 3, *5, *7, *2, 4, 9, 8, 0, 8, 0, 1" 
will produce text 'INTEL 8080A" on the display 



Keyboard 'LF" will output this text to the console. 



Registers Modified: 



All 



RAM Required: 



400 bytes 



ROM Required: 



20 bytes 



Maximum Subroutine Nesting Level: 



Ul ,„ ISIS-II 8080/8085 

Assembler/Compile r Used: MacrQ Assembler 



Programmer: 



B. Hauert, R. Farkas 



Company: 



Battelle-Geneva 



Address: 



7, route de Drize 



City: 



CH-1227 Carouge/Geneve 



State: 



Switzerland 



6/79 



4-755 



Ref. // AD6 



insite [HTEV USER ' S library subm ittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 D 8080/8085 CX8086 D Other. 



(uh additional shMt* If necessary) 



8089 — BREAK. 89 

8089 Break Point routine for saving all registers and displaying to 
CRT* 



8086, 8089 MDS System, IL/M 86 

(must include 8251 resident on 86BUS, channel attention decode with 

select=A0.) 



8089 CP, CC, TP, channel 1 or 2, Breakpoint (program requested) 

This program must be compiled (large) mode (see line 14 of list code) 



Display all registers to CRT, Restore code. 



Registers Modified: 



RAM Required: 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: pL / M _ 86 



Programmer: 



Dave Ferguson 



Company: 



Intel Corporation 



Address: 



3065 Bowers Avenue 



City: 



Santa Clara 



State: 



California 95051 



6.79 



4-757 



insite 



Ref. AB168 

INTEL* USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 □ 8048 ft 8080/8085 □ 8086 D Other SDK 80 



. (um additional ahaata If nacaaaary) 



Modified SDK-80 Restart Routine 

The original SDK-80 monitor restart routine destroys the carry bit 
because of the use of the DAD SP instruction before the flags are 
saved; the DAD SP instruction affects the carry bit. 

This routine does not destroy the carry bit. 



SDK-80 Kit or any 8080 computer 



SDK-80 monitor 



This routine replaces the original SDK-80 monitor restart routine To 
make use of it the SDK-80 owner should place a JMP 1300 instruction in 
memory location 13FD (user branch location). Also, he should use RST 7 
instead of RST1 to re-enter the monitor. The SDK-80 monitor contains 
t? Jin ™ cl ? t0 location 13FD when a RST 7 instruction is executed. 

*-i> J 222 !" struct1 ' on st o r ed in location 13FD transfers control to the 
?uS d o« DK " 80 restart routine that stores the register contents like 
the SDK-80 restart routine does but the carry bit will not be destroyed. 
The modified restart routine transfers control back to the SDK-80 
monitor (GETCM). 



Registers Modified: 



ALL 



RAM Required: 



27 Bytes 



ROM Required: 



Maximum Subroutine Nesting Level: 



Assembler/Compiler Used: 



8080/8085 Macro 
Assembler V?.n 



Programmer: 



Guenter Ruschitzka 



Company: 



Address: 



Im Bruehl 1 



City: 



6921 Zuzenhausen 



State: 



Western fiprmany 



8/79 
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4-759 



insite 



Ref. AB169 

INTEL* USERS LIBRARY SUBMITTAL FORM 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 □ 8048 $ 8080/8085 □ 8086 D Other. 



(uh additional tharta If nacaaaary) 



MDS SERIES II - DUMB TERMINAL 

Allows MDS Series II keyboard and CRT to be used as a "dumb" terminal 
using Serial Port 2 on back panel. 



MDS Series II (Model 220 or 230) 



I SIS- I I Operating System 

SYSTEM. LIB library for CO, CSTS routines. 

Characters typed on keyboard of MDS. 
Characters sent into serial port by modem, etc. 
Control -Z terminates program, and returns to ISIS. 



Characters typed on MDS keyboard are sent out to serial port and 
characters received at serial port are sent to CRT on MDS. 



Registers Modified: 



A,C,D,E,SP,H,L 



RAM Required: 1 28 By teS 



ROM Required: 



None 



Maximum Subroutine Nesting Level :« 



Assembler/Compiler Used: 8080/8085 Macro 
• — - Assemhlpr V? n 



Programmer: 



Dave Mabry 



Company: 



Chrysler Corporation 



Address: CIMS-41 8-32-03 

P.O. Box 1118 



City: 



Detroit 



State: Michigan 48288 
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4-761 



Ref. #AB170 

insitg INTEL * USER, s library submittal form 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



D 8008 D 8048 & 8080/8085 D 8086 □ Other. 



(use additional alwau If necessary) 



FILE GENERATOR 

To create and load a source file from an off-line terminal into 
an ISIS file. 



MDS, Bulk storage device - such as Techtran's 800 and 900 Series 
Disc and cassette terminals. 



IS IS- I I Systems files 



FLGEN File 



Flgen opens file for writing and sends a Control-Q to the terminal; 
thereby starting reading, which continues until reading device supplies 
a Control-S, at which time "Continue?" is typed. Keying "Y" causes 
another block (to Control-S) to be read in. Codes which cause assembler 
errors are eliminated. Keying anything but "Y" causes Flgen to exit 
to ISIS. 



Registers Modified: 



ALL 



RAM Required: 



495 Bytes 



ROM Required: 



Maximum Subroutine Nesting Level: 



~°- — 5ES 



Programmer: 



Ben Harris 



Company: 



Techtran Industries 



Address: 



200 Commerce Drive 



City: 



Rochester 



State: 



New York 1462.1 



8/79 

© Intel Corporation, 1978 



4-763 



insite 



INTEL' USERS LIBRARY SUBMITTAL WmF 



Program 
Title 

Function 



Required 
Hardware 



Required 
Software 



Input 
Parameters 



Output 
Results 



□ 8008 D8048 X3I 8080/8085 D 8086 D Other __ 



. (uaa additional ahaata If nacaaaary) 



PROGRAMMABLE SOFTWARE TIMERS 

tfa? f#°nf a l al J°f a , US6r t0 f et a software timer by specifying the 
S it °f. counts ). an d vector (Address of subroutine) tobe executed 
when the timer expires. This program allows for 24 timers 6XeCUted 

Timer or other device to provide real time clock interrupts. 



None 



Timeon: 



Ihe n c Rea^TM^ l^l^ ttmer - The timer # is turned in 
vectSr^-the^sLck^* 1 " 6 mUSt b * Called w1th the time ■*» 
Timeoff: Turns off the timer who's number is in the C Reg. 



Timer : 



JfnSV^X 1 interr fP t routine that counts the counters and 
veclor eXeCUti ° n ° f the subroutines a t the associated 



After expiration, that timer is turned off. 



Registers Modified: None on Interrupt 
All on sPtup 



RAM Required: 



Enough for counters 



ROM Required: 



Maximum Subroutine Nesting Level: 2 



Programmer: 



Company: 



Gary TehhPtt 



Address: 



Consulting Engineer 



City: 



^i!!!I^^^ $?5° Utate7 



39 Hill Street 
Pittsburg 



California 94565 



8/79 

© Intel Corporation, 1978 



4-765 



■ ■ mi 



INTEL CORPORATION, 3065 Bowers Avenue, Santa Clara, California 95051 • (408) 987-8080 

Printed in U.S.A. /B-24/0378/1 .3K NCG 



